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BASIC AVANZADO PARA NIÑOS permite al niño que 
ya tiene ligeras nociones de BASIC profundizar en el cono- 
cimiento de este lenguaje. 


Estructurado de igual forma que el volumen anterior, 
BASIC PARA NIÑOS —cuya lectura es recomendable, aun- 
que no imprescindible si el niño ya tiene algunos conoci- 
mientos de programación—, presenta un material que facilita 
al niño el descubrimiento de los secretos del BASIC, avan- 
zando progresivamente a través de su propia creatividad, 


Sin olvidar la sencillez y claridad expositiva necesarias 
para el niño, se abordan temas y conceptos de cierto nivel en 
programación BASIC. 

BASIC AVANZADO PARA NIÑOS permite su uso in- 
cluso a aquellos padres o educadores que tengan conocimien- 
tos mínimos de este lenguaje. 


Las Notas para el Adulto que se incluyen en cada capí- 
tulo configuran una práctica y conveniente guía metodoló- 
gica y didáctica para enfocar adecuadamente la comprensión 
y enseñanza del lenguaje BASIC. 

Aquellos educadores que deseen ampliar sus conocimien- 
tos sobre el aprendizaje y la didáctica de este lenguaje, pue- 
den consultar la interesante obra BASIC PARA MAESTROS, 
publicada en esta misma editorial. 

No obstante el protagonista fundamental de esta obra 
es el niño que, gracias al enfoque dado a cada tema, estará 
perfectamente capacitado para aprender por sí mismo, 


Prólogo 


Unas notas previas .. 
Seguimos 
Mirando dentro 


La quinta operación . 
Operadores aritméticos 
CLEAR/CES- coo Ebo 
INPUT (Algo Más) .....ooooooooccrcrcraran rr 
FOR/NEXT (Algo más) 
Operadores lógicos (AND, OR) 
IF/THEN (Algo más) (ON GOTO, ON GOSUB, ELSE) .... 
READ y DATA . 
RESTORE .. 


Cadenas (LEN, LEFTS, RIGHTS, MIDS, INKEYS, VAL, 
STRS, GET) ¿su soiri in an e 


CHR$ y ASC ... 
Para programar bien 


Programas ...oo..oooo.. 
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En cada uno de los capítulos de BASIC AVANZADO 
PARA NIÑOS, se estudia un nuevo concepto. Los capítulos 
se han estructurado en progresión de dificultad conceptual, 
aunque se reiteran sistemáticamente instrucciones e infor- 
maciones ya presentadas, a fin de que se desarrolle adecua- 
damente la capacidad de asimilación. 


Este paulatino aumento de información favorece el apren- 
dizaje individual, garantizando la adecuada distribución de 
energía entre los procesos de recepción y la actividad de ti- 
po elaborador, de forma que niños desde los 8 años hasta 
los 14 pueden aprender el lenguaje BASIC permaneciendo 


en cualquiera de los niveles todo el tiempo que sea necesario 
hasta que se esté preparado para pasar a un nuevo nivel. 


Se utiliza una permanente “vuelta atrás” sobre lo ya 
visto, con lo que al final del libro se habrá cubierto el pro- 
ceso total de aprendizaje: recepción y asimilación, retención 
y memorización. 

Al final de la obra se ofrecen una serie de juegos y apli- 


caciones sencillos, utilizando instrucciones en BASIC ya 
conocidas. 


Para lograr con éxito nuestros objetivos, es preciso tener 
en cuenta una serie de requisitos esenciales: 


e [El adulto debe leer el texto previamente o con el ni- 
ño. Conviene también que lea previamente las notas 


para el adulto que se encuentran a lo largo del texto 
de cada capítulo, antes de trabajar con el niño. 


El niño debe practicar solamente cuando lo desee. 
En cualquier caso, no debe extenderse en períodos 
muy largos de tiempo a fin de evitar agotamiento y 
fatiga mental. 


Es conveniente emplear el número de sesiones que 
sean necesarias hasta conseguir profundizar en cada 
concepto. 
No se debe pasar al estudio de un nuevo item si no 
estamos seguros de haber afianzado profundamente 
el anterior. 


Hay que permitir al niño que sea él quien avance, 
quien cree nuevos ejercicios prácticos, nuevas posibi- 
lidades. Que descubra por sí mismo. 


Despierte su curiosidad, anímele para que experi- 
mente mediante breves indicaciones, si fueran nece- 
sarias, tales como “qué pasaría si...”, “intenta...”. 
Abra camino a su iniciativa. Los resultados le servi- 


rán de estímulo. 


No estudien el mismo día más de una instrucción en 
BASIC. Antes de trabajar hagan un breve repaso de 
los conceptos fundamentales aprendidos en sesiones 
anteriores, para comprobar si continúan afianzados. 


e [Is conveniente que el niño haga con su ordenador 
todos y cada uno de los programas que se presentan 
a lo largo del libro, por sencillos que parezcan. 


e Si el niño lo desea, puede intentar trabajar sin ayuda 
del adulto, Supervise los resultados. 


NUESTRO BASIC 


Para trabajar con nuestros programas debe utilizar las 
instrucciones características de su propio ordenador perso- 
nal. En el libro se hace referencia a un tipo de BASIC con- 
vencional y generalizado. 


No obstante, puede ocurrir que algunos ordenadores uti- 
licen expresiones diferentes, o distintas combinaciones de 
teclas para una misma función. Consulte el manual de pro- 
gramación de su propio ordenador cuando tenga alguna 
duda. Las diferencias serán mínimas y la mayor parte de 
ellas se comentan en las Notas para el Adulto. 


ROLA. ALOMEJOR YA ME CONOCES. SOY ARTURO Y EN EL 
Liero BASIC PARA NIÑOS APRENDIMOS JUNTOS 
BASTANTES COSAS SOBRE EL LENGUAJE DE PROGRAMACIÓN 
BASIC. AHORA AVE YA ERES Todo UN PROGRAMADOR, 
VAMOS A APRENDER ALGUNAS COSAS MÉS QUE Tk 
PERMITIRÁN SER cAsi UN EXPERTO. 

CUANDO TERMÍNENOS, SABRÁS HACER PROGRAMAS MUY 
COMPLETOS Y ÚTILES, 


Si NO APRENDISTE CONMIGO EN EL PRIMER 
LIBRO PORQUE YA SABÍAS ALGO, VUELVE LA PAGINA, 
DONDE HAGO UN RESUMEN DE LO QUE 
YA SABEMOS, 


o" 


2 seGuiMos ? 


Aquí tienes el resumen de lo que ya sabemos, para 
que te sirva de recordatorio: 


PRINT Manda imprimir o escribir en la pantalla 
todo lo que le indiques. 

LET Te permite dar a una variable el valor que 
tú quieras. 

INPUT Hace que el ordenador espere un dato 


que tú le puedes dar a través de tu tecla- 
do mientras se está ejecutando o co- 
rriendo el programa. 


GOTO Con ella le das una orden tajante al orde- 
nador para que se dirija obligatoriamente 
a la línea de programa que tú le indiques. 


IF ... THEN Permite que le des unas instrucciones al 
ordenador para que, dependiendo de si 
se cumplen o no unas condiciones que tú 
mismo le marcas, haga una cosa u Otra. 


O 


FOR/NEXT 


GOSUB 


READ/DATA 


REM 


DIAGRAMAS 


Con esta instrucción preparamos al or- 
denador para efectuar un bucle y repetir 
una misma acción un número determi- 
nado de veces. 


Manda al ordenador a una determinada 
subrutina. Con la instrucción RETURN 
el ordenador vuelve al programa princi- 
pal. 


Con la instrucción DATA almacenamos 
en el programa unos datos que serán leí- 
dos por una instrucción READ. 


Te permite introducir comentarios en 
un programa, sin alterarlo. 

Quita los decimales de un número, dejan- 
do sólo la parte entera. 

Con ella podemos introducir el azar en 
un programa. 


Nos permiten ver con un esquema cómo 
va a estar construido un programa. 


A lo largo de este libro aprenderemos más cosas sobre 
estas instrucciones y también otras nuevas con las que po- 
drás hacer programas ... ¡increíbles! 


Ahora que ya sabes hacer tus propios programas vamos 
a analizar cómo y por qué interpreta el ordenador tus ins- 
trucciones. Es decir, como trabaja un ordenador por dentro. 


Ya sabes que un ordenador memoriza todas las líneas 
de programa que tú le das. Entremos en el ordenador para 
ver dónde las guarda y qué hace con los datos que tú intro- 
duces. 


EsiA ES LA 


UR 
ARTHÉTICO «LGA 


SALEN (OS DA1OS 
A TRAVES DEL 
MONITOR, LA 
AMPRESORA, 
LA LISTA o. 


DR, AQUÍ ENTRAN 
LOS DATOS, ES LA 
UNIDAD DE ENTRADA 
DE DATOS, EL 
TECLADO, 


ESTA ES LA 
MEMORIA 
CENTRAL 


ARTURO tardó algún tiempo en aprenderse estos nom- 
bres que ves en el dibujo, pero lo importante no es saberse 
los nombres sino entender cómo funciona cada una de es- 
tas partes del ordenador. 


Cuando tú, a través del teclado, metes unos datos en el 
ordenador, éstos van directamente a la MEMORIA CEN- 
TRAL. ¿Recuerdas que al ordenador hay que decírselo 
casi todo y que hay que enseñarle primero lo que debe 
hacer para que al final el programa dé el resultado que tú 
querías? 

Bien. Hay que decírselo casi todo, pero algunas cosas 
ya las sabía. Fijate bien en esto. Tú le dabas las instruccio- 
nes con unas líneas numeradas para que él las leyera por 
orden. Incluso podías darle las instrucciones con la nume- 
ración desordenada y él las ordenaba automáticamente. 
También has hecho programas para que el ordenador sume, 
multiplique... Pero tú no le enseñaste ni a sumar nia poner 
las líneas en orden. 


ACERCATE 
A LA MenoRia 
CENTRAL 


Dentro de la memoria central está la memoria ROM. En 
ella el ordenador tiene memorizados todos los datos y pro- 
gramas que necesita para saber contar, ordenar.... Todos 
esos datos los introdujo el fabricante en la memoria ROM 


para que siempre estén ahí guardados. Cuando tú haces un 
programa en el que hay una suma, estás diciendo al ordena- 
dor “Mira en tu memoria ROM cómo hacer esta operación, 


y hazla 


LoS PROGRAMAS 
QUE HA METIDO UN 
FABRICANTE SN LA MEMORIA 
ROM v0 s€ PUEDEN CAMBIAR, 
Ni LISTAR. 


Pero dentro de la memoria CENTRAL también existe 
la memoria RAM. Ella es la que se encarga de memorizar 
todas las instrucciones y datos que tú metes en el ordena- 
dor a través del dispositivo de entrada de datos, a través 
del teclado. Por eso tú puedes introducir datos y leerlos 
después. Porque se guardan en la memoria RAM, a la que 
tú puedes llegar y modificar. Cuando listas un programa, 
estás preguntando al ordenador: ¿qué tienes en la memo- 
ria RAM? 


¡Ah! Y cuando desenchufas el ordenador, se pierde to- 
do lo que esté almacenado en la memoria RAM, pero se 
sigue guardando el contenido de la memoria ROM, pues 
de lo contrario el ordenador no sabría como trabajar para 
tí cuando le pidas que haga operaciones o que interprete 
tus instrucciones. 


Cada modelo de ordenador tiene una capacidad de me- 
moria diferente. Algunos ordenadores son capaces de guar- 


chos programas y otros ordenadores no tanto. 


Para saber si un ordenador tiene poca o mucha memo- 
ria,nosotros hablamos de K. Seguro que has oído decir “este 
ordenador tiene 32 K de memoria”. 


¿Qué es una K? Verás: 


La memoria central por dentro podríamos verla como 
unas celdillas. Cada celdilla es un BIT 


A 


A cada conjunto de 8 bits le llamamos BYTE 


Esto ES 
W UN BYTE 


En cada BYTE se almacena un carácter. Es decir, que el 
ordenador utiliza un BYTE, o sea, 8 bits, para cada carác- 
ter. 


Mirando dentro 


Así, el ordenador utilizaría 8 celdillas (8 bits) para la 
letra A, o la B, o para el número 2 ó para el número 7, etc. 


1024 BYTES forman un KBYTE que es lo que llama- 
mos K. 


Si UN ORDENADOR 
TIENE UNA K tí QUE 
TIENE 4.024 BYTES 

OSEA QUE PUEDE ALMACENAR 
UNOS 4000 CARACTERES. 


Pero sigamos viendo qué pasa dentro del ordenador. 
Los datos e instrucciones van primero a la UNIDAD 
CENTRAL DE MEMORIA. De ahí pasan a la UNIDAD 
DE CONTROL. La UNIDAD DE CONTROL se encarga 
de interpretar las instrucciones y órdenes que le has dado 
en el programa. La UNIDAD ARITMETICO LOGICA es 
la que hace los cálculos, las comparaciones, etc. El resul- 
tado de estos cálculos o comparaciones pasa Otra vez por 
la UNIDAD DE CONTROL y va a parar a la MEMORIA 
CENTRAL, de donde va por la UNIDAD DE SALIDA al 
exterior. Es entonces cuando tú puedes ver en la pantalla 
el resultado de tu programa. ós 


VAYA LÍO, ¿no? 


No te preocupes. Con un ejemplo lo vamos a ver en 
seguida. Fíjate en el programa: 


10 LETA=5 

20 LETB=3 

30 LETC=A+B 
40 PRINTC 

50 STOP 


Y ahora vas a ver en el dibujo de la página siguiente, có- 
mo este programa es interpretado y ejecutado en las dis- 
tintas partes del ordenador. 


No te preocupes si no entiendes muy bien todo esto. En 
realidad, lo importante es que tengas una idea de cómo 
funciona un ordenador y que cuando oigas alguna de estas 
palabras sepas aproximadamente de qué se está hablando. 


Todo lo que puedes ver por dentro y por fuera del or- 
denador (cables, circuitos, teclado, pantalla, impresora, 
etc.) es lo que se llama HARDWARE (o equipo físico). 


Los programas, las ideas... es lo que se llama SOFT- 
WARE (o logical). 


S 


Mirando dentro 


EN LA 
UNIVAD DE 
CONTROL $E 
INTERPRETAN 
Las PNSTROCCIONES 
PEL PROGRAMA 


AQUÍ sE HACEN 


AC EL vaLeR DE 
DIMA SUMA y +A 
MEMORIER EN UNA 
cAsitLa DELA 


NOTAS PARA EL ADULTO 


0 Noes importante que el niño comprenda todos los con- 
ceptos expuestos en el capítulo precedente. Se trata sim- 
plemente de que le resulten familiares. 


Siga con el niño el recorrido que marcan las flechas del 
dibujo de la página 22. Dibuje en un papel o en la pizarra 
el esquema del ordenador y pida al niño que vaya dibu- 
jando las flechas siguiendo el orden secuencial del proce- 
so. 


Los ordenadores funcionan exclusivamente con un códi- 
go binario. Es decir, sólo admiten combinaciones de dos 
elementos (0 y 1). Así, en un BYTE, los 8 bits pueden 
combinarse de 256 maneras distintas. Efectivamente 
2% =256. Por ejemplo: 


el número 30 vendría representado por 00011110 
el número 211 vendría representado por 11010011 
Existen ya en el mercado microprocesadores que son 


capaces de procesar 16 e incluso 32 BITS a la vez, lo que 
les confiere una extraordinaria capacidad operativa. 


La Quinta _ 
operación 


y 


ARTURO se quedó muy pensativo cuando escuchó por 
primera vez eso de la quinta operación. El creía que las 
operaciones fundamentales eran cuatro: Sumar, restar, 
multiplicar y dividir. Pero hay una quinta operación, que 
es interesantísima y que permite hacer de manera muy fá- 
cil cálculos muy complicados. 


Te vamos a poner unos ejemplos sencillos. Imagínate el 
número 


1 000 000 000 000 000 000 000 


ESTA CIFRA 
TIENE 24 CEROS 


SS 


Es equivalente al número de kilómetros que nos sepa- 
ran de algunas estrellas. Cuando los astrónomos tienen que 
hacer cálculos para mandar naves espaciales, tienen que 
operar muchas veces con estas cifras. Esto es muy pesado 
y puedes cometer muchos errores. No se puede trabajar 
bien con tantos ceros. 


E) 


Una forma más simple para escribir el mismo número 
sería 


102 


que se lee ““diez elevado a 21”, Es decir, que el número 10 
se multiplica por sí mismo 21 veces. Al número que nos 
indica las veces que multiplicamos un determinado número 
por sí mismo (en nuestro caso, el 21) sele llama exponen- 
te. Por eso esta operación se llama exponenciación. 


Otro ejemplo más sencillo: El número 8 también se pue- 
de escribir así: 2*. Esto quiere decir que hay que multipli- 
car el número 2 tres veces por sí mismo. Es decir: 


2:x2:*2=8 


Te vamos a contar ahora una historia muy curiosa: 


Cuenta la leyenda que había en la INDIA un Rey que 
se encontraba espantosamente aburrido. Así que mandó 
llamar a todos los sabios de la corte para que inventaran 
un juego que le divirtiera. Muchos lo intentaron sin conse- 
guirlo. 

Hasta que un día apareció un personaje muy extraño 
que presentó al Rey un juego tan maravilloso, inteligente 
e interesante que el Rey quedó entusiasmado. Se trataba 
del juego que hoy conocemos como el juego del ajedrez. 


El Rey agradecido, decidió premiar al inventor del aje- 


drez. Y le d 


ijo: “Como premio a tu sabiduría, puedes pe- 


dirme lo que desees”. El extraño personaje contestó: “Ma- 


jestad, tan s 


6lo quiero dos granos de trigo por la primera 


casilla del tablero, 4 granos por la segunda, 8 granos por la 
tercera, 16 granos por la cuarta... y así sucesivamente has- 
ta completar las 64 casillas del tablero de ajedrez”. 


El Rey se quedó muy contento, porque pensó que el in- 


ventor del aj 


jedrez se conformaba con muy poco a cambio 


de un juego tan interesante, así que mandó llamar a su 


Primer Mini 


stro y le ordenó que entregara al inventor lo 


que éste pedía. 


Pero cuá 


fue su sorpresa cuando el Ministro vino a co- 


municarle que, aunque todo su pueblo se dedicase a culti- 


var trigo ... 


cantidad que pidió el inventor! 


¡no habría trigo en el mundo para reunir la 


* 


Para que tú te hagas una idea, harían falta más o menos 


18 446 744 500 000 000 000 granos de trigo 


Esta cifra es tan grande, que casi ni la podemos imaginar. 
Si toda la tierra se dedicara a cultivar trigo, sin hacer otra 
cosa, se tardarían 45.000 años en reunir todo este trigo. 
Aunque corriéramos mucho, para contar todos los granos 
de trigo harían falta por lo menos 1.170 millones de siglos, 
o sea, 117.000 millones de años ¡INCREIBLE! 

Eso es porque, como ya te habrás dado cuenta, por cada 
casilla el inventor pidió el doble de granos que le daban por 
la casilla anterior. Es decir, que multiplicaba por 2 el nú- 
mero de granos de la casilla anterior y así durante 64 casi- 
llas. 

El enorme número anterior lo podríamos haber escrito 
2% . Parece mentira ¿eh? 

En un ordenador, 2% se escribe así: 2 1 64, porque en 
el ordenador el signo de la exponenciación es f. 


Vamosa hacer un programa que reproduzca esta historia. 


5 REM “AJEDREZ” 
10  PRINT ” Pulsa S para otra casilla” 
20 PRINT 


EN LA LÍNGA 50 HULTIPLICA 
POR 2 EL NUMERO DE GRANOS. 


LETC=0 ¿ADA VEZ QUE PULSES 
LETA=1 S y ENTER VERAS EN PANTAUA 
LETA=A*2 Es e A EN 
LETC=C +1 CADA CASILLA , 


PRINT “CASILLA”, “GRANOS” 
PRINT C, A 

INPUT S$ 

IF S$="S” THEN GO TO 50 


No hará falta que te expliquemos cómo funciona este 
programa pues todas las instrucciones son muy sencillas y 
ya las aprendiste en el libro BASIC PARA NIÑOS. 

También podríamos haber escrito este programa utili- 
zando un bucle FOR/NEXT. 


5 
10 
20 
30 
40 
50 
60 
70 
80 
90 


REM “AJEDREZ” 
PRINT “PULSAS PARA OTRA CASILLA” 


PRINT FORA 
LETA=<1 LÍNEA so, UTILIZAMOS 
FORC=1T0 64 EL sfáno DE 
LETA=21C EXPONENCIACIÓN, 
PRINT “CASILLA”, “GRANOS” 

PRINTC,A Y 

INPUT S$ 


IF S$="S" THEN GO TO 110 


100 STOP 
110 NEXTC 


Ejecuta el programa. Verás como la cantidad de granos 
es cada vez mayor y, cuando llegues más o menos a la casi- 
lla 30, el ordenador escribe unas cifras un poco más “raras”. 


En la línea 30, por ejemplo, te aparecerá en pantalla: 


y 1.07374182E +9 


Eso significa que el ordenador nos está diciendo en su 
lenguaje que también utiliza una forma simplificada para 
escribir un número grande. 


El símbolo E + 9 es igual que decir que tienes que co- 
rrer la coma 9 números hacia la derecha. Es decir, que si 
multiplicas 9 veces por 10 el número 1,07374182 obten- 
drás el número de granos que hay en la casilla 30 del table- 
ro de ajedrez. 


30 230 2430 1.073.741.820 
(Como tú lo 
escribirías) 
1.07374182E +9] 


(Como te lo dice 
el computador) 


MIRA LA 
TABLA QUE 
ME HE 


HECHO 


Cuando llegues al final del programa, verás que el orde- 
nador te da (utilizando su forma de expresarse) el número 
total de granos que corresponden a las 64 casillas. 


El mismo resultado, pero sin verlo casilla a casilla, pue- 
des verlo tecleando simplemente: 
PRINT2 164 


Como ves la exponenciación es muy interesante para 
manejar números grandes. 


NOTAS PARA EL ADULTO 


€ Fs muy probable que el niño no se sienta especialmente 
motivado hacia este tema. De ahí la importancia de expli- 
cárselo utilizando la leyenda del juego del ajedrez. Es pro- 
bable que algunos niños no sean capaces de asimilar cl 


concepto de magnitud numérica que se ha considerado 
en el ejemplo. No tiene importancia, como tampoco la 
tiene el que no comprendan del todo el concepto de expo- 
nencial. 


Lo hemos incluido en este capítulo para que el niño lo 
conozca y no le resulte nuevo cuando mencionemos la 
operacion de exponenciación dentro del capítulo dedica- 
do a los operadores aritméticos. 


El desconocimiento del concepto exponencial no afec- 
tará en absoluto la comprensión de los temas que se tra- 
tarán a lo largo de este libro. 


Haga ver al niño que la expresión gráfica que utilizará el 
ordenador para indicar una exponenciación es E +... 
mientras que la que el niño debe utilizar a través del te- 
clado es . 


No se han comentado los programas pues las instruccio- 
nes que aparecen en cllos son sobradamente conocidas 
por el niño. Si ha notado alguna dificultad de compren- 
sión, repasen las instrucciones que se suponen ya cono- 
cidas. 


Si a pesar de la utilización de los exponentes un número 
resulta demasiado grande para la capacidad del ordena- 
dor, éste nos dará un mensaje del tipo 


?0V FRROR o NUMBER TOO BIG o similar. 


k 


Ya sabes que la máquina es capaz de operar si tú se lo 
pides en una instrucción de tu programa. Cuando tú haces 
un programa, tienes mucho cuidado con el orden de las 
líneas, pues ése es el orden que leerá el ordenador. 

Bien. Lo mismo tienes que hacer cuando quieras que el 
ordenador efectúe una operación. No puedes escribir las 
sumas, restas, multiplicaciones .... todo mezclado y sin or- 
den. El ordenador es muy metódico y siempre sigue un 
mismo orden a la hora de operar. 


Vamos a ver como operaría con la siguiente expresión: 
PRINT3-2+8-4 


PARA EL ORDENADOR ES 
(GUAL 0€ ¡¡MPORTANTE LA SUMA 
QUE LA RESTA. 

EL RESULTADO ES 5 


El ordenador sumará y restará los términos uno tras Otro 
en el orden en que tú los has escrito. 


e 


Pero vamos a hacer un cambio: 


AQui eL 


RESULTADO 
Es 3 


PRINT 3-2 +8/4 


Para el ordenador es mucho más importante la división 
que la suma o la resta, así que lo primero que hará es divi- 
dir los números a cada lado de la barra de dividir y luego 
sumará y restará. 


Como has visto, existen unas reglas que el ordenador si- 
gue. Son muy fáciles: Supongamos que tenemos un proble- 
ma matemático en el que aparecen todas las operaciones 
(Suma, resta, multiplicación, división y exponenciación). 


El ordenador 
PRIMERO hace todas las exponenciaciones, de izquier- 
da a derecha 


SEGUNDO hace todas las multiplicaciones y divisiones, 
empezando por la izquierda 


TERCERO hace todas las sumas y restas, empezando 
por la izquierda. 


Operadores aritméticos 


Pero cuando se encuentre con algo escrito entre parén- 
tesis, hará primero todas las operaciones que estén dentro 
del paréntesis (y por el orden que él conoce) y luego se- 
guirá actuando con las restantes operaciones siguiendo la 
regla que te hemos dicho antes. 


Suponte que tú no quieres dividir 8 entre 4 y al resul- 
tado sumarle 3 y restarle 2, sino que quieres saber el re- 
sultado de 3 menos 2 mas 8 y todo eso dividirlo por 4. 


Como tienes que indicarle cuál es el orden en que tú 
quieres que opere, escribirías: 
PRINT (3 — 2 +8)/4 
El ordenador hará primero siempre lo que se encuentre 
entre paréntesis ( ), así que el resultado ahora es 2.25. 
* Hagamos de nuevo otro cambio: 


PRINT3+2+8 /4 


El ordenador multiplicará 3 por 2 y luego dividirá 8 
entre 4, Al resultado de la multiplicación le sumará el 
resultado de la división. En este caso, el ordenador multi- 
plica antes de dividir porque, en principio, el ordenador 
lee de izquierda a derecha. 


€) 


EL RESULTADO ES 8 
PERO Si PUSIERAS UN PARENTESIS 
£L RESULTADO SERÍA DISTINTO. 
Pon PRinT 3*(2+8)/8 
eL RESULTADO ES PS 


Hagamos un nuevo cálculo: 


PRINT 3+ 2 +8*/4 


CON EL ORDENADOR 
DEBERÍAS ESCRIBIR 
3:2+893/4 


C 


Para el ordenador es más importante la exponenciación 
que la suma, multiplicación o división, por lo que primero 
calcula 8? (que es:512). Después, siguiendo el orden de iz- 
quierda a derecha, actúa así: 


3x2 + 512/4 Primero multiplica 3 por 2 y luego di- 
PR A vide 512 entre 4. 
6 + 128 Finalmente sumará los resultados ob- 


tenidos en las operaciones anteriores. 


El resultado final es 134. 


* Otro ejemplo, ahora con paréntesis: 


EL RESULTADO 
Es 385.5 


PRINT3 + (2 +8*)/4 


> 


Primero eleva 8 a 3 

Al resultado le suma 2 

El resultado lo multiplica por 3 

El resultado lo divide entre 4 

Ten en cuenta que al escribir esto en tu ordenador lo 
harías así: 


PRINT 3 + (2 +8 1 3)/4 


Sigue paso a paso el orden de las operaciones y verás 
como esta vez el ordenador calcula primero lo que está en- 
tre paréntesis y luego sigue las reglas que ya sabemos. 


* ¿Qué pasaría si cambiamos el paréntesis de sitio? Escri- 
be: 


PRINT 3 + (2 +8)?/4 


Primero suma 2 más 8 

El resultado lo eleva a 3 

El resultado lo multiplica por 3 
El resultado lo divide entre 4 


Como te habrás dado cuenta, dependiendo de los núme- 
ros y operaciones que encerremos dentro de los paréntesis, 
el resultado será distinto. Comprenderás la importancia que 
tiene que tengas muy claro las operaciones que quieres ha- 
cer antes de escribirlas de forma “informática”. De lo con- 
trario el ordenador te dará un resultado falso. 


Fíjate en un ejemplo. ARTURO tenía 15 caramelos pero 
ha perdido 3 y los que le quedan tiene que repartirlos en- 
tre sus 6 amigos. Si escribe en el ordenador: 


PRINT 15 — 3/6 


el ordenador, siguiendo las reglas que conoces, daría como 
resultado 14.5. Como ves esto no puede ser. ARTURO de- 


bería escribir: 


PRINT (15 — 3)/6 


Veámoslo con un programa y utilizando además varia- 
bles en lugar de números. 


10 PRINT “CUANTOS CARAMELOS TIENE ARTU- 
RO?” 

20 INPUTA 

30 PRINT“CUANTOSPERDIO?” 

40 INPUT B 


50 
60 
70 
80 


PRINT “CUANTOS AMIGOS TIENE?” 

INPUT C 

LET X=(A- B)/C 

PRINT “ ARTURO DA”; X;“CARAMELOS A CA- 
DA UNO DE SUS”; C; “AMIGOS” 


Fíjate en la importancia de escribir correctamente la lí- 
nea 70. Cámbiala por: 


70LETX=A-—B/C 


y verás cómo el ordenador te da una respuesta absurda. 


NOTAS PARA EL ADULTO 


e La jerarquía de los operadores aritméticos es en realidad 


muy simple y fácil de comprender. Quizás resulte más 
difícil de explicar que de entender, 


El niño no debe retraerse ante la aparente profusión de 
operaciones. Son todas extraordinariamente sencillas y 
basta con practicar un poco para dominar el tema. 


Realicen conjuntamente distintas operaciones y cálculos 
en orden creciente de dificultad. 


e Haga ver al niño la importancia de conocer claramente a 
priori el cálculo que se desea realizar, a fin de que pueda 
transcribirlo correctamente cn su expresión informática, 
Lo ideal es escribirlo previamente en un papel. 


Comente con el niño la ventaja de escribir un programa 
como el que se incluye en este capítulo en lugar de te- 


clear directamente PRINT (15 — 3)/6, lo cual evidente- 
mente nos daría el mismo resultado. La utilización de 
programas con variables y la introducción de los valores 
a través de instrucciones INPUT permite la utilización 
de un mismo programa para diferentes casos. 


Si lo considera oportuno o necesario, tenga en cuenta 
que es posible utilizar expresiones como ésta: 


(3+*(Q+8) 13)/4 
en las que aparecen paréntesis externos e internos. El or- 
denador en estos casos dará siempre prioridad « los pa- 
réntesis internos. 


Ya sabes que cada vez que empiezas un nuevo programa 
debes borrar todos los datos que el ordenador tiene en su 
memoria. 

Generalmente habrás utilizado el comando NEW. Con 
ello el ordenador quedaba listo para volver a escribir un 
nuevo programa. Es decir, borrábamos de la memoria todos 
los datos y programas que el ordenador tenía memoriza- 
dos. 


Vamos a probar algunas cosas nuevas. Teclea este pro- 
grama: 


10 LETA=5 
20 PRINT “DIME UN NUMERO” 
30 INPUT B 


40 LETM=A*B 
50 PRINT “EL RESULTADO ES”; M 


Ahora tienes en la pantalla este pequeño programa. Te- 


clea el comando CLEAR y verás qué pasa. El programa ha 
desaparecido de la pantalla. 


Ahora teclea LIST. El programa vuelve a estar en pan- 
talla. Esto ocurre porque el comando CLEAR no borra el 
programa. 


Haz correr el programa y dale a B el valor 6, por ejemplo. 
En la pantalla podrás ver el resultado. Teclea CLEAR y 
luego lístalo. Fíjate en el programa. Está igual que al prin- 
cipio. A sigue valiendo 5 pero B no vale 6, sino que cuan- 
do ejecutes el programa otra vez, podrás darle a B el valor 
que quieras. 


CON CLEAR El 
ORDENADOR PIERDE 
EL NALOR QUE LE 
HAS DADO A LA 

vartabie 6 


Si TECLEARAS 
NEW DESAPARECERÍA 
EL PROGRAMA 
PARA SIEMPRE 


Otra instrucción para limpiar la pantalla pero sin perder 
el programa es CLS. Pero mientras que NEW y CLEAR eran 
comandos, es decir, órdenes directas sin línea de programa, 
CLS es una sentencia y debe ir incluida en una línea de 
programa. Cuando en la ejecución de un programa el orde- 
nador llega a una línea con la instrucción CES, borrará 
todo lo que en ese momento esté escrito en la pantalla. 
Añade al programa la línea: 


45 CLS 


Corre el programa y compara las diferencias. 


Por eso es conveniente que al principio de cada progra- 
ma la instrucción de tu primera línea sea CLS. Así tendrás 
de manera automática la pantalla limpia en cuanto lo eje- 


cutes. Añade a nuestro programa: 5 CLS 


NOTAS PARA EL ADULTO 


Practique con el niño las sentencias y comandos explica- 
dos hasta conseguir su dominio. 


En nuestro programa, B es una variable y A es una cons- 
tante pues su valor lo hemos determinado nosotros mis- 
mos en la línea 10 del programa, 


Tenga en cuenta que: 


El comando RUN ponce las variables a cero y borra o no 
la pantalla según el tipo de ordenador, 


El comando NEW borra el programa de la memoria RAM. 


El comando CLEAR borra la pantalla pero no la memo- 
Tia, aunque pone las variables a cero. 


La instrucción CLS borra la pantalla pero no altera las 
variables ni borra la memoria, 


Conviene que a partir de ahora el niño se acostumbre 
a utilizar de forma sistemática la instrucción CLS, 


Seguro que ya conoces para qué y cómo empleamos la 
instrucción INPUT. Hasta ahora habíamos combinado 
PRINT e INPUT para poder “hablar” con el ordenador 
Vamos a ver ahora cómo INPUT nos permite ahorrarnos lí- 
neas de programa. Teclea de nuevo el programa de la pá- 
gina 41. Ahora cambia la línea 20 y escribe: 


20 INPUT “ESTOY ESPERANDO UN NUMERO”; B 


Borra la línea 30. Al ejecutar el programa te sale en pan- 
talla exactamente lo mismo que antes. Has combinado en 
una sola línea las funciones que harían PRINT e INPUT, El 
programa completo te quedaría así: 


5 CLS 

10 LETA=5 

20 INPUT “ESTOY ESPERANDO UN NUMERO”; B 
30 LETM=A+*B 

40 PRINT “EL RESULTADO ES”; M 


CUIDADO. EL TEXTO SIEMPRE 
ENTRE COMILLAS. 

NO OLVIDES EL PUNTO Y CONA 
NU LA VARIABLE AL FINAL 
DE LA LINEA 


t Vamos a hacer un programa para practicar esta forma de 
utilizar INPUT. Ayudemos a ARTURO a completar su fi- 
cha de curso: 


5 
10 
20 
25 
30 
40 
50 
60 
70 
80 


CLS 

INPUT “ NOMBRE”; N$ 
INPUT “APELLIDO”; AS 
INPUT “CURSO”; C 

INPUT “CALLE”; C$ 

CLS 

PRINT NS; “AS 

PRINT “DE”; C; “CURSO” 
PRINT “VIVE EN”; “ “CS 
END 


Pero todavía podemos hacer el programa más corto, 
pues INPUT nos permite que el ordenador nos pida más de 
una variable en una misma línea de programa. El programa 
anterior lo podríamos escribir: 


5 
10 


CLS 
INPUT “DIME TU NOMBRE, APELLIDO, CURSO y 
CALLE”; NS, AS, €, C$ a 


FÍJATE QUE 
ESTAS VARIABLES 

VAN SEPARADAS POR 
COMAS 


INPUT (Algo más) 


15 
20 
30 
40 


CLS 

PRINT “DATOS PERSONALES” 

PRINT 

PRINTNS;” ”; AS;” QUE ESTUDIA”; C;“CURSO 
VIVE EN ”;C$ 


DESPUES DE CADA 
DATO, TECLEA ENTER. 

EL ORDENADOR ESPERARÁ 
, SL SIGUIENTE DATO, Y 
ISI HASTA COMPLETAR Los 
QU DATOS 


Como ves, INPUT puede resultar muy cómodo. Obser- 
va una cosa curiosa de la línea 40. Entre NS y AS hemos 
dejado un espacio en blanco para que los textos asignados 
a cada una de estas variables queden bien separados. 


Cuando en lugar de separar dos textos vayan a separár 
una variable numérica y un texto entre comillas, simple- 
mente deja un espacio en blanco dentro de las comillas, 
como lo has venido haciendo hasta ahora. 


NOTAS PARA EL ADULTO 


e Practique con el niño esta forma de utilizar INPUT y há- 
gale ver que, dentro de una misma línea, puede hacer que 
el ordenador espere datos numéricos o alfanuméricos. 
Las variables deben ir separadas por comas. 


Practiquen igualmente la colocación de espacios dentro 
de las sentencias PRINT, a fin de evitar que se junten los 
textos. No todos los ordenadores actúan igual en este sen- 
tido pues algunos de ellos dejan automáticamente espa- 
cios en blanco a cada lado de un valor o dato numérico. 


Trabajaremos un poco sobre esta instrucción, que tú ya 
conoces. Usar FOR/NEXT en un programa es tan útil y 
tan cómodo, que conviene que te acostumbres a ella y la 
practiques mucho. 


A partir de ahora, vamos a utilizarla con frecuencia, así 
que antes vamos a repasar un poco cómo funciona esta ins- 
trucción y de paso aprenderemos algunos trucos para apro- 
vecharla mejor. 


Teclea el programa: 


10 FORX=1T03 
20 PRINTX 
30 NEXTX 


Este programa es tan sencillo, que no hace falta que te 
lo expliquemos. Puedes escribirlo también así: 


10 FORX=1T03 : PRINTX : NEXT X 


* 


*k 


E FOR/ NEXT (Algo más) 


Por si no lo sabías, te diremos que dentro de una mis- 
ma línea de programa se le pueden dar varias instrucciones 
al ordenador. Lo único que hay que hacer es separar una 
instrucción de otra por dos puntos (:). Esto lo puedes ha- 
cer con cualquier instrucción. 


Una forma más completa de escribir FOR/NEXT sería: 
10 FORX=1T010 STEP 2 


Esto quiere decir que X tomará valores de 1 hasta 10 
pero de dos en dos. Si pusieras STEP 3 los tomaría de tres 
en tres y así sucesivamente. 


Como otras instrucciones en BASIC, FOR/NEXT per- 
mite muchas combinaciones con otras instrucciones para 
facilitar la programación. Por ejemplo, escribe: 


FIJATE COMO EN 


10 INPUTA Er E EL 

Le 
20 INPUTE valores aue LE OAnoS 
30 INPUTC A TRAVES 08 INPUT 
40 FORX=ATOBSTEPC 
50 PRINTX 


60 NEXTX 


Corre el programa y dale a las variables A, B y Cel valor 
que tú quieras; por ejemplo, O, 20 y 3. Tendrás una lista 
de números que empezará en O y escribirá valores de tres 
en tres. Fíjate que el último valor que escribe es 18. De 
acuerdo a la instrucción STEP, el próximo valor a escribir 
sería 21, pero tú le has dicho al ordenador que el último 
valor de X será 20, así que después de 18 ya no toma más 
valores. 


Otra cosa que hay que tener en cuenta es que, si lo ne- 
cesitas, puedes decirle al ordenador que se salga del bucle 
FOR/NEXT. Añade al programa anterior: 


45 IFX=9 THEN GOTO 100 
100 PRINT “ME HE SALIDO DEL BUCLE PORQUE 
X HA TOMADO EL VALOR 9” 


Es decir, que con instrucciones del tipo GO TO o IF .... 
THEN puedes salir del bucle. Con ello el bucle queda inte- 
rrumpido. Lo que no debes hacer es intentar que el orde- 
nador entre en un bucle desde fuera del buele, porque te 
surgirá algún error. 


Sigamos viendo formas de utilizar FOR/NEXT. Gence- 
ralmente, dentro de un bucle tú metes una serie de instruc- 
ciones que quieres que el ordenador te repita un número 
de veces determinado. 


d y que Pasa sí 
NO METEMOS 
NADA ? 


Pues .... no pasa nada. Es decir, que tendríamos un bu- 
cle vacío. ARTURO no entendía muy bien para qué podía- 
mos querer nosotros un bucle vacío, que no hiciera nada. 
La verdad es que tiene su utilidad. Aunque un bucle esté 
vacío, mientras lo está ejecutando el ordenador no hace 
otra cosa. Así que podemos utilizar un bucle así para re- 
tardar una acción del programa. Por ejemplo, teclea: 


5 CLS 

10 PRINT “ESTA LINEA SE BORRARA DENTRO DE 
UN MOMENTO” 

20 CLS 


30 PRINT “YA SEHA BORRADO” 


Cuando ejecutes el programa, no te dará tiempo a ver 
en la pantalla el primer texto porque el ordenador, después 
de escribirlo en pantalla, sigue leyendo la línea 20 y te lo 
borra. Conviene que introduzcas en este programa un bu- 
cle vacío para retrasar la lectura de la línea 20 por el orde- 
nador. 


E) 


Tovo TIENE 
Su PORQUE 


Añade: 


12 FORX=1T0 3000 
13 NEXTX 


Corre el programa. ¡Perfecto! Estos bucles se llaman 
también bucles de retardo. Puedes controlar el tiempo de 
retardo cambiando la instrucción FOR. Por ejemplo 
FOR X= 1 TO 1000, o lo que tú quieras. 


Te recuerdo que en lugar de las líneas 12 y 13 podrías 
haber escrito una sola línea: 


12 FORX=1T0 3000 : NEXT X 


* Vamos a ver otro ejemplo: 


10 FORX=1T0 10 
20 PRINT “PROBANDO BUCLES” 
30 NEXTX 


Al correr el programa, en pantalla te aparecerá 10 ve- 
ces el texto de la línea 20. 


S) 


* 


Añade ahora: 


25 FORY=1T0 2000 
26 NEXTY 


Te aparecerá el mismo texto en pantalla, pero poco a 
poco, porque después de ejecutar la línea 20, el ordenador 
ejecuta el bucle de retardo antes de leer la línea 30 y tomar 
el siguiente valor de X. 


Casi sin darnos cuenta, hemos visto algo muy importan- 
te: Hemos metido un bucle dentro de otro bucle. Estos bu- 
cles se llaman bucles internos o, mejor, bucles anidados. 
¿Por qué anidados? Porque el bucle de fuera es como un 
nido dentro del cuál está metido el bucle interno. 


Y otra cosa muy importante: En nuestro ejemplo, el 
ordenador ejecuta primero todo el bucle de retardo (el in- 
terno) antes de tomar el siguiente valor del bucle de fuera 
O externo. 


[S) 


* 


¿Qué pasaría si el bucle anidado no fuera un bucle vacío 
sino un bucle normal? Vamos a verlo con un ejemplo. Te- 


clea el programa: 


LA LÍNEA DE COLOR 
TE MARCA EL BUCLE 
EXTERNO. 

LA LÍNEA NEGRA TE 
MARCA EL BUCLE 
INTERNO 


10 FORA=1T02 
20 FORB=1T04 
[o PRINTA, B 
40 NEXTB 

50 NEXTA 


El bucle de fuera (externo) es el de las líneas 10 y 50. 
El bucle anidado (interno) es el de las líneas 20, 30 y 40. 
Fíjate en el importante detalle de que primero pones NEXT 
B (para cerrar el bucle interno) y luego NEXT A (para ce- 
rrar el bucle externo). 


No te equivoques haciéndolo al revés, pues el programa 
no saldría. Veamos como funciona el programa. Sigue des- 
pacio y atentamente las explicaciones. 


En la línea 10 le da el primer valor a A(A= 1). 


En la línea 20 le da el primer valor a B(B = 1) y empie- 
za a ejecutar el bucle anidado. A vale 1. 


En la línea 30 escribe estos valores. 


En la línea 40 le dices al ordenador que siga ejecutando 
el bucle interno y tome el siguiente valor de B (B =2). En 
este momento A todavía vale 1. 


Como se está ejecutando el bucle interno, el ordenador 
vuelve a la línea 30 e imprime ahora los valores que tiene: 
(A=1)y(B=2). 

De esta forma el ordenador sigue ejecutando el bucle 
interno hasta dar a la variable B todos los valores. Cuando 
B =4, el ordenador ha terminado el bucle interno y llega a 
la línea 50, donde toma el siguiente valor de A. Ahora A 
vale 2. 

Entonces, con este valor, vuelve a repetir todo el proce- 
so del bucle interno. Así una y otra vez hasta terminar con 
todos los valores de A. 

N 


ESTO Lo ENTIENDO BIEN, 
PERO) ME GUSTARÍA 


VERO UN Pao MÁS 
CLARO. 


Para verlo más claro, ¿por qué no le pedimos al ordena- 
dor que nos ayude? Cambia la línea 30: 


30 PRINT “A VALE”; A;”... AHORA B VALE”; B 


Añade la línea: 


35 IFB=4THENPRINT “TERMINADO EL BUCLE 
INTERNO PARA EL VALOR”; A; "DE LA VARIA- 
BLEA” 


E) 


Corre el programa. En pantalla tienes los distintos valo- 
res que van tomando uno detrás de otro las variables A y B. 


VALOR DEA VALOR DE B 
EL BUeLE 
LLO INTERNO DA TODOS 


Los POSIBLES VALDRES 
A LA VARIABLE Y 


.n a. 


TARA EL SEGUNDO 


VALOR Dt A... 


“** EL QUELE 


2 A! INTERNO DA TODOS 
2 <A) LOS POSIBLES VALORES 
2 3 ALA VARIABLE 

2 4 


Fíjate ahora en el dibujo de la página siguiente. Verás 
el recorrido que hace el ordenador cuando encuentra un 
bucle anidado. 


FOR/NEXT (Algo más) 


FOR y=1102 py 


PoR 24 104 pp pr lle], 


PRINT y X 4H) 1,2 143 Y a 


NEXT X 


BvcLE ANIDADO 


BveLE EXTERNO 


Vuelve a leer las explicaciones mirando la pantalla y el 
programa. Comprobarás que es fácil de entender. 


* Veamos algunos programas prácticos donde aplicar los 


bucles anidados. Por ejemplo, para obtener una lista de las 
distintas formas de leer las fichas de dominó, teclea: 


0) 


10 
20 
30 
40 
50 


FORX=0T06 
FOR Y=0T06 
PRINTX: “1 "Y 
NEXT Y 

NEXT X 


Para evitar que te aparezcan los números demasiado de- 
prisa en la pantalla, añade el bucle de retardo: 


35 


FORA=1T0500 : NEXTA 


y los verás aparecer uno a uno. 
* Una forma de tener la tabla de multiplicar sería: 


10 
20 
30 


40 
50 
60 
70 
80 
90 
100 
110 
120 


CLS 

PRINT “TABLA DE MULTIPLICAR” 

PRINT “PULSA ENTER DESPUES DE CADA MUL- 
TIPLICACION” 

FORA=1T0 2500 : NEXTA : CLS 


FORX=1T0 10 

FOR Y=1T0 10 

LETC=X*Y 

PRINTX; “POR”; Y; “ES”; C 

INPUT ES CUANDO EL ORDENADOR 
LLEGA A LA LÍNEA 90 

CLS ESPERA QUE TECLEES 

NEXT Y ENTER PARA SEGUIR 

NEXT X CON El PROGRAMA 


FOR/NEXT (Algo más) 


Fíjate como en la línea 40 introducimos un bucle de re- 
tardo para retrasar el borrado de la pantalla. El bucle ex- 
terno se indica en las líneas 50 y 120. El bucle anidado se 
indica en las líneas 60 y 110. 


Atención al truco de la línea 90. Con ella obligamos al 
ordenador a pararse esperando un dato. Así evitamos que 
la pantalla se nos llene con la tabla de multiplicar. En cuan- 
to le introducimos el dato (da igual el que sea, basta con 
pulsar ENTER), el ordenador sigue con el programa. En el 
capítulo de “CADENAS...” veremos una forma más co- 
rrecta de conseguir el mismo efecto utilizando INKEY$. 


Guira LA LINEA 90 
Y COMPARA LAS 
DIFERENCIAS 


Ejecuta el programa. 


Bueno, por ahora es suficiente. Como ves, se pueden ha- 
cer muchas cosas con los bucles. Incluso, organizar una li- 
ga de baloncesto con los amigos de ARTURO. ¿Te atreve- 
rías a ayudarle? Si quieres ver cómo se hace, mira el pro- 
grama de la página 146. 


NOTAS PARA EL ADULTO 


e Es conveniente que el niño practique esta instrucción, 

por su extraordinaria versatilidad y su constante utiliza- 
ción en BASIC. 
Hágale ver que se pueden introducir infinitos bucles ani- 
dados dentro de un programa, pero que es imprescindible 
una adecuada colocación de las sentencias NEXT, pues 
de lo contrario los bucles se cruzarían, lo cuál daría error. 


CORRECTO INCORRECTO 
10 FORA=0TO10 10 FORA=0TO10 


FOR C =0 TO 
100 STEP 5 


En los bucles de retardo hay que tener en cuenta que no 
todos los ordenadores tienen la misma velocidad de eje- 
cución, por lo que un bucle del tipo FOR X=1 TO 1000, 
puede retrasar la ejecución del programa más o menos 
tiempo en función del tipo de ordenador. 


Operadores lógicos 


Tú recuerdas que utilizando IF THEN le poníamos unas 
condiciones al ordenador. Por ejemplo, decíamos cosas 
como éstas: 


IFA=BTHENGOTO 1 
IF M>5THENPRINT*“* CORRECTO” 
IFAS<>"ARTURO” THEN STOP 


Te habrás dado cuenta que en cada una de estas líneas 
de programa sólo le poníamos una condición al ordenador. 
El BASIC, sin embargo, te permite ponerle más de una 
condición, con lo que se aumentan las posibilidades de pro- 
gramación. Vamos a ver como se hace utilizando los ope- 
radores lógicos. Los más utilizados son: 


AND que significa Y 
OR que significa 0 


* 


Te vamos a poner algunos ejemplos para que veas có- 
mo Operan. 


ARTURO tiene ganas de jugar en el jardín y su mamá 
le dice: 


“SI TIENES UN BALON Y TIENES TIEMPO PUEDES JUGAR” 


La mamá de ARTURO le ha puesto dos condiciones. 
La 1* condición es que tenga un balón ... ¿Se cumple? 
La 2% condición es que tenga tiempo ... ¿Se cumple? 
ARTURO tiene un balón y tiene tiempo para jugar. 
Como se cumplen las dos condiciones, ARTURO podrá 
salir a jugar. Pero como puede ocurrir que no siempre se 


cumplan las dos condiciones vamos a hacer una tabla para 
ver lo que puede pasar. 


MIRA LA TABLA 


DE LA PARINA 
SIGUIENTE 


12condición | 24 condición | Resultado 
Tener balón |Tener tiempo 


| ARTURO saldrá 


ARTURO no saldrá 


Como ves, solamente si ARTURO tiene un balón Y 
tiempo, saldrá a jugar. En BASIC, Y se dice AND. Vamos 
a hacer un esquema de esto y luego un diagrama y su pro- 
grama para reproducir esta situación. 


El diagrama de flujo del programa sería: 


ÁTE ATREVERÍAS 


A HACER EL 
PROGRAMA L 


Y el programa sería: 


10 
20 


30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
155 
160 


CLS 

PRINT “CONTESTA SIO NO A LASPRE- 
GUNTAS” 

PRINT 

INPUT “ARTURO TIENE BALON?"; X$ 
INPUT “ARTURO TIENE TIEMPO?”; Z$ 
IF X$="SI” AND Z$="SI” THEN 120 
PRINT 

PRINT “COMO NO SE CUMPLEN” 
PRINT “LAS DOS CONDICIONES” 
PRINT “ARTURO NO PUEDE JUGAR” 
GOTO 30 

PRINT 

PRINT “COMO SE CUMPLEN” 

PRINT “ LAS DOS CONDICIONES” 
PRINT “ ARTURO PUEDE JUGAR” 
PRINT“——===========-=-- is 
GOTO 30 


Fíjate bien en la línea 60. Le estás diciendo al ordena- 
dor que sólo en el caso de que X$ y Z$ sean iguales a “SI” 


vaya a la línea 120, a partir de la cual el ordenador nos re- 
confirma que por cumplirse las dos condiciones ARTURO 
puede ir a jugar. Ejecuta el programa y contesta como quie- 
ras a las preguntas que te hará el ordenador. Compara los 
resultados con la tabla de la página 63. 


¡Ah! Hay algo que te va a ayudar mucho cuando eje- 
cutes un programa. Puede suceder que cuando teclees la 
respuesta a una pregunta que te haga el ordenador cometas 
un error. Por ejemplo, puede ocurrir que en el programa 
anterior teclees “SE” o “SU” u otra cosa en lugar de “SI”. 


TODOS PODEMOS 
EQUIVOCARNOS 


Estos errores pueden afectar de manera importante al 
resultado del programa. Comprúebalo contestando, por 
ejemplo “ST” a la primera pregunta y “SU” a la segunda. 
Verás como el ordenador te da una respuesta equivocada 
para tí, pues el ordenador solamente entiende que no has 
tecleado “SI” y lo entiende como “NO”. Esto lo conoces 
tú ya perfectamente por la forma en que está escrito el 
programa en la línea 60 y siguientes: Si las dos respues- 
tas no son exactamente “SI” y “SI”, el ordenador sigue 
leyendo el programa en lugar de saltar a la línea 120. 


Operadores lógicos 


Así que es muy conveniente introducir en el progra- 
ma una línea “chivata” que nos descubra cuándo hay un 
error de este tipo. 

En nuestro último programa podemos utilizar preci- 
samente una línea ““chivata” que contiene el operador ló- 
gico AND, aunque en este caso no lo usamos para nada en 
la solución del problema de ARTURO sobre jugar o no en 
el jardín, sino únicamente para descubrir un posible fallo 
al pulsar las teclas. Añade: 

55 IF X$<>"SI”" AND X$<>"N0” OR Z$<>"SI" 
AND Z8<>"NO” THEN 165 

165 PRINT 

170 PRINT “TECLEASTE MAL TU RESPUESTA. CON- 
TESTA OTRA VEZ” 

180 GOTO 30 


La línea 55 significa que:si X$ es distinta de “ST” y dis- 
tinta de “NO” o Z$ es distinta de ““SI” y distinta de “NO” 
tu respuesta es incorrecta pues el programa te pedía con- 
testar solamente “SI” o “NO”. Fíjate que en esta línea 
utilizamos un nuevo operador lógico: OR (en español sig- 
nifica 0). 

Vamos a conocerlo mejor con un ejemplo, como hici- 
mos antes. La mamá de ARTURO le dice ahora: 


“SI TIENES UN BALON O TIENES UNA BICICLETA 
PUEDES JUGAR” 


La mamá de ARTURO ha puesto dos condiciones, pero 
como ves, basta que se cumpla una de las dos para que 
ARTURO pueda jugar. Hagamos nuestra tabla para ver las 
posibilidades que tiene ARTURO de salir a jugar. 


12 Condición | 24 Condición | , Resultado 
Tener balón | Tener bicicle- 


ARTURO jugará 


Como ves, basta que ARTURO tenga una de las dos co- 
sas para que salga a jugar. En BASIC, O se escribe OR. El 
esquema de lo que puede suceder sería así: 


Puedes hacer también un programa para ver las posibili- 
dades de ARTURO. Sobre la base del programa anterior, 
cambia las líneas siguientes: 


50 INPUT “ARTURO TIENE BIBICLETA?”; Z$ 
60 IFXS="SI” OR Z$="“SI” THEN 120 

85 PRINT “NINGUNA DE” 

130 PRINT“COMOSE CUMPLE UNA DE ” 


Ahora en la línea 60 le estás diciendo al ordenador que 

si se cumple que X$ o Z$ son iguales a “SI” vaya a la línea 
120, a partir de la cual el ordenador nos reconfirma que 
por cumplirse una de las dos condiciones ARTURO puede 
ir ajugar. Ejecuta el programa y compara los resultados con 
los de la tabla de la página 68. Fíjate que aquí seguimos uti- 
lizando la línea 55 (la “chivata””) igual que estaba en el 
programa anterior. 


Estos ejemplos te habrán servido para entender mejor 
las tablas y el funcionamiento de los operadores lógicos. 
Estos se utilizan con cierta frecuencia y, cuando te veas en 
la necesidad de usarlos, te parecerán muy sencillos. 


Te vamos a proponer una aplicación muy sencilla y 
muy .... misteriosa. 


ARTURO cree que es un espía y tiene un montón de 
programas con datos secretos que no quiere que nadie vea. 
Así que ha decidido poner una clave secreta a cada progra- 
ma para que nadie que no conozca la clave pueda ejecutar 
el programa. Tú puedes hacer lo mismo, poniendo delante 
de cada programa que hagas unas líneas como éstas: 


1 
2 


SES 


LETC=0 

CLS: PRINT “ESTE PROGRAMA ES SECRETO. 

CONTESTE CORRECTAMENTE A LAS CLAVES”: 

PRINT 

INPUT “DIGA EL NUMERO Y DESPUES LA PALA- 

BRA SECRETA”; M, L$ 

LETC=C +1: IFC=3THEN7 

IFM=25 AND L$=“ARBOL” THEN 10 

GOTO 2 

PRINT * USTED NO CONOCE LA CLAVE. DEBE 
SER UN ESPIA. TUVO TRES OPORTUNI- 
DADES. ESTE PROGRAMA SE AUTODES- 
TRUIRA EN 5 SEGUNDOS” 

FOR Y =1 TO 3000: NEXT Y 

CLS: STOP 

ENE (aquí seguirá tu programa) 


Operadores lógicos | 


El contador-C de la línea 4 controlará el número de in- 
tentos. Cuando C toma el valor 3, el ordenador salta a la 
línea 7, donde, después de imprimir un texto de aviso, bo- 
rra el programa de la pantalla. Fíjate en el bucle de retar- 
do de la línea 8. En la línea 9, puedes sustituir la instrucción 
STOP por NEW, pero en ese caso el programa entero se 
borrará de la memoria. 


TT CUIDADO 
si PONES NEW 
PERDERÁS EL 


PROGRAMA PARA 
SIEMPRE || 


-) 


Haz tu propia clave secreta cambiando a tu gusto los 
valores de M y LS en la línea 5. 

Hagamos otro cambio. Sustituye en la línea 5 AND por 
OR y corre el programa. Comprobarás que en este caso 
basta con que aciertes una de las dos claves para que el or- 
denador te permita seguir la ejecución del programa prin- 
cipal. 

¡Ah! En la línea 5 hemos puesto al final THEN 10 por- 
que suponemos que tu programa principal empieza en la 
línea 10. Haz los cambios necesarios si tu programa empie- 
za en otra línea. 


¡D) 


NOTAS PARA EL ADULTO 


e Los operadores lógicos sólo actúan entre dos posibilida- 
des: verdadero (representado por 1) y falso (representado 
por ()). En el análisis de las posibilidades que nos ofrecen 
los operadores lógicos se utilizan las llamadas TABLAS 
DE VERDAD. La tabla correspondiente al operador ló- 
gico AND sería: 


Estos conceptos tienen frecuentes aplicaciones no sólo 
en Informática, sino también en Lógica y en Lógica Ma- 


temática. Conviene que el niño los asimile, lo cual es 
muy sencillo si se ejemplifica la teoría con planteamien- 
tos como los expuestos en este capítulo, 


Acomode los ejemplos a la capacidad e interés del niño. 


Existen otros operadores lógicos (NOT, XOR, NOR...) 
cuya función es más compleja y que no han sido analiza- 
dos por cónsiderarlos de un nivel conceptual superior a la 
capacidad del niño al que está destinado este libro. 


Vamos a mostrarte lo que es un MENU y las distintas 
formas que puede adoptar la instrucción IF/THEN. 


Vamos a ver cómo funciona con un ejemplo. Teclea el 
programa: 


10 CLS 

20 INPUT “DIUN NUMERO”; A 

30 INPUT “DI UN NUMERO”; B 

40 PRINT “PULSA 1PARA MULTIPLICAR” 

50 PRINT “PULSA 2 PARA DIVIDIR” 

60 PRINT “PULSA 3PARA SUMAR” 

70 PRINT “PULSA 4PARA OPERAR CON OTROS NU- 
MEROS” 

80 PRINT “PULSA 5 PARA TERMINAR” 

90 INPUT “QUE OPCION QUIERES?”; X 

100 IFX<>1ANDX<>2AND X <>3AND X<>4 
AND X <>5 THEN 220 

110 IFX=1THEN 160 

120 IFX=2 THEN 180 

130 IFX=3THEN 200 

140 IFX=4THEN TO 


150 
160 


170 
180 


190 
200 


210 
220 


230 


IF X=5 THEN 230 

PRINT “EL RESULTADO DE MULTIPLICAR ”; A; 
“POR”; B;“ES”; A * B 

GO TO 90 

PRINT “EL RESULTADO DE DIVIDIR”; A; “EN- 
TRE”; B; “ES”; A/B 

GOTO 90 

PRINT “EL RESULTADO DE SUMAR”; A; “MAS”; 
B;"ES"¡A+B 

GO TO 90 

“TECLEASTE MAL TU OPCION. TECLEALA DE 
NUEVO” : GO TO 90 

sToP 


Como ves es un programa muy sencillo. En las líneas 40 
hasta la 90 estás escribiendo lo que se llama un MENU. 


d ES QUE VAMOS 
A COMER 


Bueno, no vamos a comer. Pero al igual que en un res- 
taurante te dan un menú para que elijas la comida que te 


O 


gusta, en un programa puedes poner al principio un menú 
para que al ejecutarlo puedas elegir la opción que más te 
interesa. 


De esta manera tienes un programa más claro y más fá- 
cil de interpretar. Pon un menú en todos los programas que 
hagas y que permitan elegir entre varias opciones. ¡Ah! No 
te olvides de poner la línea ““chivata” para evitar errores. 

Fíjate en la línea 160. El resultado de multiplicar A 
por B no lo hemos asignado a ninguna variable, sino que le 
hemos dicho al ordenador que escriba directamente A + B. 
Igual hacemos con las líneas 180 y 200. 


Bueno, ahora vamos a utilizar ON GOTO. No todos los 
ordenadores te permiten utilizar esta instrucción, así que 
consulta primero en tu manual si puedes emplearla o no. 


Borra las líneas 110, 120, 130, 140 y 150 y escribe: 


110 ON X GO TO 160, 180, 200, 10, 230 


Verás que el resultado es el mismo al correr el progra- 
ma. Con ON GOTO es como si le dijeras al ordenador “de- 
pendiendo de lo que valga X te irás a las líneas....” 


X valdrá siempre 1, 2, 3... y así hasta el número de op- 
ciones posibles que queramos incluir en el programa. 


Otra posibilidad que te ofrece ON es combinarlo con 
subrutinas. Es decir, utilizando la forma ON X GOSUB... 


NOTAS PARA EL ADULTO 


O La instrucción ON GOTO o ON GOSUB no es funda- 
mental, sino simplemente un auxiliar de la programación, 
El niño puede practicar con ella para adquirir soltura y 
velocidad de programación. 


Tenga en cuenta que no todos los ordenadores disponen 
de esta instrucción. Si el suyo no la tiene, no deje de co- 
mentar con el niño otros conceptos importantes desarro- 
llados en este capítulo, como son la presentación de un 
programa con un menú (líneas 40 a 90), el empleo de lí- 
neas de detección de errores al introducir datos en la eje- 
cución del programa (línea 100) y la impresión directa 
del resultado de operaciones aritméticas sin asignación 
previa a una determinada variable (líncas 160, 180 y 200). 


Si comprueba que el niño asimila con relativa facilidad 
estos conceptos puede ampliar sus conocimientos relati- 
vos a la instrucción IF...THEN explicándosela en su for- 
ma más completa: 


IF (Condición) THEN (Instrucción) ELSE (Instrucción) 


Es decir, si la condición se cumple, se ejecutará la instruc- 
ción que sigue a THEN. Si no se cumple, se ejecutará la 
instrucción que sigue a ELSE, Por ejemplo: 


IF? A =5 THEN PRINT “ACERTASTE” ELSE 
PRINT “FALLASTE” 


ARTURO va a organizar unas MINI OLIMPIADAS, y 
quiere saber con qué amigos cuenta para cada prueba. Para 
tenerlo todo muy bien organizado quiere llevar estos datos 
con ayuda del ordenador. 


Para poder hacerlo cómodamente, va a escribir un pro- 
grama utilizando la instrucción READ/DATA. ¿Le ayuda- 
mos? Vamos a seguir paso a paso la manera de hacerlo. 

ARTURO tiene amigos especialistas en tres pruebas: 
CARRERA, BALONCESTO y NATACION. Así que lo 
primero que hace es preparar unas sentencias DATA con 
el nombre de sus amigos y la especialidad que practican: 


DESPUES ASIGMAREMOS 
ALA VARIABLE AY Los 
NOMBRES YA LA 
VARIABLE O $ Las 
ESPECIALIDADES 


DATA LUIS, CARRERA 
DATA JUAN, BALONCESTO 
DATA CARLOS, NATACION 
DATA JOSE, BALONCESTO 
DATA PEDRO, BALONCESTO 
DATAJORGE, CARRERA 
DATA MIGUEL, NATACION 
DATA ARTURO, BALONCESTO 


IIA INS 


Estos datos serán leídos después por una instrucción 
READ. Pero eso ya lo veremos más adelante. Ahora vamos 
a hacer un Menú, como tú ya conoces: 


10 
20 
30 
40 
50 
60 
70 


CLs 

PRINT “PULSA 1 PARA CORREDORES” 
PRINT “PULSA 2 PARA BALONCESTISTAS” 
PRINT “PULSA 3 PARA NADADORES” 
PRINT “PULSA 4 PARA FIN DEPROGRAMA” 
PRINT: INPUT “TECLEA TU OPCION”; X 
IFX>40RX<1 THEN PRINT “TECLEASTE 
MAL TU OPCION”: GOTO 60 


Fíjate la forma tan sencilla y original de detectar errores 
de tecleado en la línea 70 (la “chivata””). 

En las líneas 80, 90 y 100 le diremos al ordenador que 
se vaya a las diferentes subrutinas del programa según la 
opción que elijas: 


80 
90 
100 
110 


200 


IFX=1 THEN GOSUB 1000 

IFX=2 THEN GOSUB 2000 

IFX=3 THEN GOSUB 3000 

IFX=4 THEN PRINT “FIN DEPROGRAMA”: 
GOTO 200 

END 


Escribamos la subrutina para buscar a los corredores: 


1000 READ AS, BS 
1010 IFB$=“CARRERA” THEN 1030 
1020 GOTO 1000 
1030 PRINTAS 

1040 GOTO 1000 


LA LÍNEA A000 
LEE LOs DATOS 
DE LAS SENTENCIAS 
DATA 


Analicemos como funciona esta subrutina. En la línea 
1000 se leen los datos almacenados en las líneas DATA del 
principio del programa. En la línea 1010 le decimos al or- 
denador que cuando B$ sea igual a “CARRERA” vaya a 
la línea 1030 donde escribirá AS (el nombre del amigo que 
tiene esa especialidad). Vuelve después a la línea 1000 don- 
de continuará leyendo las sentencias DATA que le faltan 
por leer. 


Si B$ es distinto de “CARRERA”, el ordenador con- 
tinúa leyendo el programa y en la línea 1020 recibirá la 
orden de volvera la línea 1000 para seguir buscando datos. 


Añade también: 


150 GOTO 20 


Así te evitas tener que teclear RUN cada vez que quie- 
res organizar otra búsqueda. 


Ejecuta el programa como está. Pero ¡cuidado! de mo- 
mento sólo puedes elegir la opción 1, porque todavía no 
hemos escrito las subrutinas correspondientes a las otras 
opciones. 


En la pantalla te aparecerán los amigos de ARTURO que 
son especialistas en CARRERA. También te aparecerá un 
mensaje indicándote que el ordenador no tiene más datos 
que leer desde la línea 1000. Por eso conviene que añadas 
un dato “falso”: 


9 DATAFIN, FIN 
y en la subrutina añade la línea: 


1015 IF B$=“FIN” THEN PRINT “LOCALIZADOS LOS 
CORREDORES”: RETURN 


con lo cual damos la subrutina por terminada. 

Con RETURN la primera línea que ejecutará el ordena- 
dor será la 150. 

Hagamos ahora la subrutina que nos dará la lista de ba- 
loncestistas: 


2000 READ AS, B$ 

2010 IFB$=“BALONCESTO” THEN 2030 

2015 IF B$=“FIN” THEN PRINT “LOCALIZADOS LOS 
BALONCESTISTAS”: RETURN 

2020 GOTO 2000 

2030 PRINTAS 

2040 GOTO 2000 


No hace falta que te la expliquemos, porque funciona 
exactamente igual que la subrutina anterior. 

Pero ¡ATENCION! Ejecuta ahora el programa. Pide la 
opción que tú quieras (la 1 o la 2). El ordenador te ofrece 
en pantalla la lista de los amigos cuya especialidad es la que 
acabas de pedir. 

Ahora pide la otra opción. El ordenador no te imprime 
ningún nombre y te da un mensaje de error: No tiene da- 
tos para leer. 


dy ESTO, 
POR QUE 2 


Pues, muy sencillo. Cuando una sentencia READ está 
leyendo valores almacenados en las sentencias DATA, es 
como si en cada dato colocara un punto o señal imaginario 
para saber que ese dato ya ha sido leído. 


Añade finalmente la subrutina que nos dará los nadado- 
res: 


2900 RESTORE: CLS 

3000 READ AS, B$ 

3010 IFB$="“NATACION” THEN 3030 

3015 IF B$="FIN” THEN PRINT “LOCALIZADOS LOS 
NADADORES” : RETURN 

3020 GOTO 3000 

3030 PRINT AS 

3040 GOTO 3000 


NOTAS PARA EL ADULTO 


Las instrucciones READ, DATA y RESTORE son muy 
útiles pues simplifican mucho el trabajo de asignación de 
valores a las variables. Conviene que el niño, ya en esta 
fase, utilice normalmente las mismas como un auxiliar 
más de la programación. 


Sigan el programa precedente paso a paso con el ordena- 
dor. No continúen con cada nueva fase sin haber enten- 
dido perfectamente el paso anterior. 


Algunos ordenadores exigen que los datos incluidos en 
una sentencia DATA se escriban entre comillas. En otros 
no es necesario. 


Presten atención a las líneas 1010, 2010 y 3010, No co- 
metan ningún error ni incluyan espacios en blanco al es- 
cribir el texto entrecomillado que estamos asignando a 
las variables. De hacerlo así, al pedir una especialidad, 
el ordenador buscará en DATA un valor que no existe, 
pues el ordenador interpreta un espacio en blanco como 
un carácter más, 

Siguiendo los mismos criterios ya cxpuestos y haciendo 
las modificaciones necesarias puede ampliar los campos 
añadiendo más especialidades, o más opciones (por ejem- 
plo, la edad de los participantes). Si tiene dificultades, 
vea el programa tipo de la página 150. 


Escribiendo RESTORE seguido de un número de línca 
que contenga una sentencia DATA, el ordenador leerá 
los datos existentes a partir de ese número de línea, Por 
ejemplo, en nuestro programa, un RESTORE 4 ignoraría 
a LUIS, JUAN y CARLOS en la segunda y sucesivas lec- 


turas. 


Los datos del programa se han incluido en las líneas 1 a 
9 para una mayor claridad, pero igualmente pueden co- 
locarse al final del mismo o, incluso, en la forma: DATA 
LUIS, CARRERA, JUAN, BALONCESTO, CARLOS, 
NATACION, JOSE ... etc. 


Vamos a conocer una instrucción que evita mucho tra- 
bajo. Desde que aprendió a utilizarla, ARTURO aprovecha 
todas las ocasiones que puede y la emplea en sus programas. 


La verdad es que ahorra mucho tiempo. 


¿Cómo descubrió ARTURO la intrucción DIM? Todo 
surgió un día que nuestro amigo quiso clasificar y ordenar 
algunas de sus cosas. Primero se hizo una relación: 


LIBROS JUGUETES 
PITUFOS BALON 
SUPERMAN BICICLETA 
GALAXIAS RAQUETA 
INDIANA JONES PATINES 
PATO DONALD 


PEQUEÑA LULU 


ROPA 


PANTALON 
CAMISA 
GORRA 
ZAPATOS 
PIJAMA 


Después decidió. darle a cada objeto una variable. Así 


que empezó a escribir: 


Pero ESTO 
NO TIENE) 
SENTIDO Y ADEMAS 
NO MEVA A / 
VALER PARA 


/ 


LETAS="PITUFOS” 
LET BS="SUPERMAN” 


ARTURO tiene razón. Va a tardar mucho tiempo en 
definir todas las variables. Además, como luego tenga que 
añadir más objetos, se le van a acabar las variables. Y silue- 
go quiere que el ordenador le dé una relación de todos los 
objetos, clasificados por temas, tendrá que poner en su 
programa instrucciones del tipo PRINT AS, PRINT BS, 
PRINT CS, etc. 

Así que decidió utilizar lo que se llama variables con 
subíndice. Una variable con subíndice se escribiría, por 
ejemplo: 


A(D, AQ)AG)... eto. 


Como ves, todas tienen la misma letra pero son variables 
distintas. 


Trabajar con ellas tiene muchas ventajas. En primer lu- 
gar, la asignación de estas variables se puede hacer más rá- 
pidamente utilizando un bucle FOR/NEXT. Vamos a tra- 
bajar con los libros de ARTURO. 


Escribe primero: 


5 CLS 
10 DIM L$ (6) 


Esto quiere decir que el ordenador va a reservar en su. 
memoria 6 casillas para 6 variables que tendrán todas el 
mismo prefijo o la misma letra. En nuestro caso, L$. Así que 
las variables serán L$ (1), L$ (2), L$ (3), LS (4), LS (5) y 
LS (6). Vamosa darles valores a estas variables. Como todas 
tienen el mismo prefijo, no es necesario que escribamos 6 
líneas de programa con LET, sino que podemos utilizar un 
bucle FOR/NEXT. Escribe: 


20 FORN=1T06 

25 PRINT “Escribe el libro” 
30 INPUT L$(N) 

35 CLS 

40 NEXTN 


DENTRO DEL BUE, 
M VALORA” PRIMERO 4, 
LUEGO 2, LUEGO 3,4, 
5y6 


El bucle que empieza en la línea 20 va a hacer que N to- 
me uno detrás de otro valores desde 1 hasta 6. Por 6 veces, 
el ordenador nos preguntará que valor le queremos asignar 
a LS (N). Si sigues el orden que puso ARTURO al princi- 
pio de este capítulo, las variables quedarán así: 


L$ (1) =PITUFOS 

L$ (2) =SUPERMAN 

L$ (3) = GALAXIAS 

L$ (4) = INDIANA JONES 
L$ (5) =PATO DONALD 
L$ (6) =PEQUEÑA LULU 


El ordenador los tiene ya todos memorizados. Para pro- 
barlo, teclea, por ejemplo, PRINT LS (3) o PRINT LS (5). 
¡El ordenador te contesta! 

Así que podemós hacer que el ordenador nos imprima 
—diciéndoselo con una sola instrucción— el valor de todas 
las variables que tienen como prefijo común L$. Añade al 
programa las líneas: 


50 FORN=1T06 
60 PRINTLS(N) 
70 NEXTN 


Con este bucle el ordenador te imprimirá en pantalla to- 
dos los libros de ARTURO. Fíjate todo el trabajo y el tiem- 
po que te has ahorrado. ] 


Si queremos repetir el mismo proceso para los juguetes 
y para la ropa de ARTURO, lo mejor es utilizar un menú. 


Te sugerimos que utilices el prefijo J$ para todas las va- 
riables de los juguetes y R$ para las variables de la ropa: 


Vamos a hacer un programa para conocer los dis- 
tintos objetos que tiene ARTURO clasificados por grupos. 
Empecemos desde el principio. Borra antes el programa 
anterior. 


Primero prepararemos al ordenador para que reciba to- 
dos los datos: 


En LA UNER 20 


ALSERVAMOS MEMORÍA 
PARA LAS VARIABLES 
10 CLS DE LOs LIBROS, 


20 DIM L$ (6) EN EL QucLe DE 

30 FORN=1T06 AN 

40 PRINT” ESCRIBE EL LIBRO” ORDENADOR NOS 
PIDE Los TÍTULOS 

50 INPUT LS (N) DE Los LIBROS 

60 CLS 

70 NEXTN 

80 DIMJ$ (4) 


90 FORN=1T04 
100 PRINT “ESCRIBE EL JUGUETE” 
110 INPUT JS (N) 


120 CLS 


EN LA LÍNEA 20 
RESERVANCS MEMORIA PARA 
LAS VARIABLES DE LOS JUGUE- 
TES. GN EL BUCLE De la 
LÍNEA 90 mAstA LA 420 
EL ORDENADOR Nos PIDE Los 
NOMBRES DS LOS JUGUETES 


130 NEXTN 


140 
150 
160 
170 
180 
190 


En LA LÍNEA 440 RESERVAMOS 
HEMORÍA PARA LAS VARIRBLES 0€ 
LA ROPA. EN EL BUELE DE LA 
LINEA 450 MASTA LA 4% El 
QROENADOR NOS PIDE 105 NOMBRES 
DE LA ROPA 


DIM R$ (5) 
FORN=1T05 
PRINT “ESCRIBE LA ROPA” 
INPUT RS (N) 

CLS 


NEXT N 


Ahora escribiremos un menú para que en su momento 
podamos elegir cualquiera de las tres listas de objetos que 


tenemos. 


200 
210 
220 
230 
240 
250 
260 
270 
280 
290 


CLS 

PRINT “OPCIONES:” 

PRINT “PARA LIBROS PULSA 1” 

PRINT ” PARA JUGUETES PULSA 2” 

PRINT “PARA ROPA PULSA 3” 

INPUT ” PULSA LA OPCION ELEGIDA ";X 
IF X=1 THEN 300 

IF X=2 THEN 360 

IF X=3 THEN 410 

IFX<>1AND X<>2AND X<>3THENPRINT 
*“ TECLEASTE MAL TU OPCION”: GO TO 250 


Finalmente, hagamos la parte del programa que nos es- 


cribirá la lista escogida. 


300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
500 


510 
520 


CLS aQuí ia 

E Nos Mi 
FORN=1T06 ers, ie 30) 
PRINT L$ (N) < 
NEXT N 
GO SUB 500 
CLS: STOP 
CLS 
Ei OS 

JUGUETE 

NEXT N CLUÍNEAS 3H o 390) 
GO SUB 500 
CLS : STOP 
CES maví EL ORDENADOR 
FORN=1T05 nes SSSERIBE LA 
PRINT RS (N) cUncas h30 0 450) 
NEXT N 
GO SUB 500 
END 


INPUT “PULSA K PARA OTRA LISTA. PULSA 
OTRA TECLA PARA TERMINAR”; K$ 
IFK$=" K” THEN 200 

RETURN 


Ñ 
E 
| 


O 


CORRE EL PROGRAMA: 
PERO Si AL TERMINAR QUIERES 
EJECUTARLO OTRA VEZ... 


[NO TECLEES RUN | 


Este programa tiene un inconveniente: Cada vez que 
teclees RUN y corras el programa tendrás que introducir 
nuevamente los datos, pues como ya sabes, RUN pone 
todas las variables a cero. 


Si tuvieras el programa guardado en un cassette con los 
datos ya introducidos, la única forma de evitar que se bo- 
rraran sería tecleando GOTO 200 en lugar de RUN. En la 
línea 200 el programa empieza a pedirte opciones. Esto no 
es muy práctico. 


Se puede hacer el programa de manera que el ordenador 
conserve en memoria todos los datos. Podemos usar las 
instrucciones READ/DATA. La estructura general del pro- 
grama no cambia, pero, para introducir los datos en la 
memoria del ordenador escribiríamos: 


10 CLS 

20 DIM LS(6) 

30 FORN=1T06 
40 READ LS /(N) 
50 NEXTN 


EN La Linea 40 
EL ORDENADOR LEE 
6 DATOS QUE TENDRA'S 
QUE ALMACENAR EN UNA 
SENTENCIA DATA (como 
LADE LA PAGINA 
»iGUIENTE) 


Y en alguna parte del programa (preferentemente al fi- 
nal) pondrías una sentencia DATA: 


802 DATAPITUFOS, SUPERMAN, GALAXIAS, INDIA- 
NA JONES, PATO DONALD, PEQUEÑA LULU 


Siguiendo el mismo método tendrías que hacer cambios 
parecidos para los juguetes (líneas 80 hasta la 130) y para 
la ropa (líneas 140 hasta la 190). También tendrás que es- 
cribir dos líneas más de DATA, con los juguetes y la ropa. 


NOTAS PARA EL ADULTO 


e La instrucción DIM es muy utilizada en la realización de 
listas y tablas. Conviene que el niño la comprenda per- 
fectamente antes de abordar cl estudio de capítulos pos- 
teriores, en los que se aplicará de forma habitual. 


El ejemplo utilizado en este capítulo no resulta —por su 
estructura— verdaderamente práctico en la vida real, pe- 
10 ayuda al niño a comprender y practicar insistentemente 
la instrucción DIM a lo largo del programa. 


e En la mayoría de los ordenadores, sólo es necesaria la 
utilización de DIM cuando se van a utilizar más de 10 
variables indexadas. 


En caso de utilizar más variables que las previamente di- 
mensionadas se producirá un error, que su ordenador de- 
tectará inmediatamente. 


En nuestro programa se han empleado variables de carac- 
teres a fin de aplicar un ejemplo más motivador para el 
niño. DIM puede utilizarse igualmente con variables nu- 
méricas. 


Cuando emplee variables alfanuméricas, debe tener en 
cuenta que algunos ordenadores exigen que al estable- 
cer la dimensión se especifique también el número má- 
ximo de caracteres que puede tener cualquiera de los 
valores asignados a las variables. Así, en nuestro ejemplo 
anterior la línea 20 se escribiría: 


20 DIMLS5 (6,13) 


con lo que le indicamos al ordenador que reserve en su 
memoria espacio para 6 variables con prefijo común L$, 
pudiendo tener cualquiera de ellas un máximo de 13 
caracteres. 


Cuando el niño esté completamente familiarizado con 
la instrucción DIM y la emplee con soltura, puede am- 
pliar la versatilidad de sus programas combinando esta 
instrucción con otras, por ejemplo INPUT. 


Así, unas líneas de programa para introducir a través del 
teclado el número de elementos de la lista serían: 


10 INPUT “CUANTOS LIBROS VAS A 
LISTAR?”; A 

20 DIMLS$(A) 

30 FORN=1TOA 

40 INPUTLS (N) 

50 NEXTN 


La instruccion DIM se utiliza también frecuentemente 
para la realización de tablas. Aunque su explicación es- 
capa a los objetivos de este libro, se expone a continua- 


ción un breve eiemplo. El BASIC permite la utilización 
de variables con dos o más subíndices. 


Así, el programa 


DIM A (2, 4) 

FORX=1T0O 2 

FORX=1T04 

PRINT “VALOR”: X;%,”; Y; “DE LA 
MATRIZ A”; “ >”; 

INPUT A (X, Y) 

PRINT A (X, Y) 

NEXT Y 

NEXT X 


definiría los valores de una tabla similar a esta: 


Columna Columna Columna Columna 


dl 2 3 4 


Fila 1 10,0 [10 A(1,3 | A(,4) | 
Fila2 | AQ,1) | AQ)2) | AQ3)| AQÍ) 


De esta forma, el elemento A (2, 3) será el situado en la 
intersección entre la fila 2 y la columna 3. 


Una de las ventajas que tienen los ordenadores es que 
pueden ayudarte mucho a hacer trabajos en los que hay 
que repetir una misma cosa muchas veces. Como ya sabes, 
el ordenador es muy rápido. Así que, un trabajo sencillo 
que a tí te puede llevar mucho tiempo, el ordenador lo ha- 
ce en segundos. 


Nosotros a lo largo del día siempre estamos ordenando 
algo: Ordenamos las pegatinas, ordenamos las fichas de cla- 
se, etc. También podríamos ordenar los nombres de nues- 
tros amigos por orden alfabético en nuestro listín. Y tu 
ordenador puede también ordenar todas estas cosas por tí. 
Sólo tienes que enseñarle cómo hacerlo. 


Vamos a ir viendo poco a poco cómo se hace. Entrene- 
mos primero al ordenador para que vaya comparando nú- 
meros. Escribe este programa para que el ordenador com- 
pare dos números dados. 


10 CLS 

20 INPUT “DI UN NUMERO”; K 
30 INPUT “DI OTRO NUMERO”; A 
40 IFA>KTHENLETK=A 

50 PRINT“ELMAYOR ES”; K 


En las líneas 20 y 30 el ordenador espera los valores. 
En la línea 40 el ordenador los compara. Le decimos que 
si el valor que hemos dado a la variable A es mayor que 
el valor de la variable K, entonces que la variable K tome 
el valor de A (que es mayor) y lo imprima. 


Por ejemplo K =5 y A=9. 


Como A es mayor que K (es decir, 9 es mayor que 5) 
K = A (K toma el valor 9) y se imprime. 


Pueba tú cambiando los valores de A y K. 


EN LA LÍNEA 40 
KK TOMA EL NUMERO 
HAYDA¿ Que ES EL 
GuE vamos A 
PMPRÍMIR 


Si queremos que el ordenador compare varios números 
y después nos escriba el mayor, podemos utilizar un bucle. 
Añade las líneas: 


24 INPUT “CON CUANTOS NUMEROS LO QUIERES 
COMPARAR?”;N 


25 FORI=1TON 
45 NEXT! 


Así puedes darle hasta N números para comparar. El or- 
denador te escribirá el mayor. 


* 


Supongamos que queremos que el ordenador compare 
y escriba todos los números que le demos en orden (de 
menor a mayor). 


En el programa anterior el ordenador sólo guardaba en 
memoria el valor mayor de los dos que comparaba. Es co- 
mo si tú tuvieras una ficha con un número en tu mano. Te 
van dando otras fichas, y tú las comparas y te guardas so- 
lamente la ficha mayor. La menor, la tiras. 


Pero si lo que quieres es ordenarlas desde el número me- 
nor al número mayor, tendrás que guardártelas todas para 
luego clasificarlas y ordenarlas. Así que no puedes tirar 
ninguna ficha o te faltarán números. 


Lo mismo tiene que hacer el ordenador. Vamos a ver 
un ejemplo. Supongamos que queremos ordenar de menor 
a mayor los números que nos dan en este orden: 9, 3 y 5. 


Tú con tus fichas harías así: Compararías la primera 
con la segunda y las ordenarías, después tomarías la que 
ahora ocupa el primer lugar, la compararías con la tercera 
y las ordenarías. Finalmente compararías las que ahora ocu- 
pen los lugares segundo y tercero y las colocarías en su lu- 
gar. 


0 SER, SEGUIRIAMOS 
EL PROCESO QUE SE VE 
EL LA TABLA DELA 

PAGINA SIGUIENTE 


PASOS 


Al empezar, tenemos 


1? Compara 9 y 3. Como 3 es menor, 
lo colocamos delante. 

2? Compara 3 y 5. Como 3 es menor, 
lo deja donde está. 


3” Compara 9 y 5. Como $ es menor, a 


lo colocamos delante. 


PRIMERO COMPARAS EL PRIMER NÚMERO 

cow El SEGUNDO. 

Después EL PRIMERO CON EL TERCERO. 

ENTONCES YA SABES CUAL ES El MAS 
PEQUEÑO DE TODOS, Y LO COLOCAS EL PRIMERO 

AMORA COMPARAS EL SEGUNDO y EL TERCERO. 

EL MAYOR DB LOS DOS ¡RA EN EL ÚLTIMO LUGAR. 


La ordenación está hecha. El proceso es el mismo para 
3 6 1000 números, o los que quieras. 


Pero veamos como lo haría el ordenador. Antes tendre- 
mos que asignar estos valores a unas variables. 


A B Cc 


Cuando trabajemos con el ordenador, para obtener el 
resultado final tendremos que darle una orden del tipo 
PRINT A, B, C. Pero ¡OJO! Si el ordenador escribiera aho- 
ra los valores de estas variables, escribiría 9 - 3 - 5. Así 
que tenemos que decirle que asigne a la variable A el nú- 
mero más pequeño, a la variable B el número intermedio 
y a la varible C el número mayor. 


Es decir, que el ordenador tendrá que intercambiar los 
valores de las variables entre sí. Los pasos a seguir serían 


los siguientes: E 


LS 


A BC COMO EMPEZAMOS 


[91] 65] 


J 


1% compara A y B. Como 3 es menor que 9, lo asigna- 
mos a A. Es decir, A = 3, que es lo mismo que decir que A 
toma el valor de B(A = B). 


A B € 


No LE VEO LA 
GRACIA, 

ASÍ, A y B VALEN 

Lo MISMO 


Ordenando cosas 


lion MOMENTO, UN MOMENTO 1,1 
AQUÍ HAY PLEO QUE ESTÁ MAL, LOQUE NOSOTROS 

QUEREMOS ES OLE Ay a INTERCAMBIEN $US VALORES y NO QUE 
VALGAN 10 MISMO. EN BASIC, DIRÍAMOS 

A0LET A=8 

20 LET 8:A 
Y ESTO m0 TIENE SENTIDO PORQUE SERÍA Lo mismo QUE DECIR 

ADLETA: 3 

20 LETB A (que VALE 3) 
ESCRITO ASÍ, LoS VALORES NO SE 
iNTERCAMBIAN. 


| HAY QUE HACER ALGO! 


Tiene razón ARTURO. Tenemos que decirle al ordena- 
dor que la variable A no pierda su valor cuando tome el 
valor de B. Hay una forma de hacerlo: Utilizar una varia- 
ble extra donde momentáneamente se pueda guardar ese 
valor. 


El proceso que seguiría el ordenador sería: 


PASA LA PAGINA y 
FITATE Bien EN LoS 
Q PASOS 


VARIABLE 


EL VALORA 
06 A PASAR 
LA VARIABLE 
EXTRA 


Boy. 


ELVALR pe VARIABLE 
e mania EXTRA 
A 
—>= zz E 
EL VALOR De VARIABLE 
LA CASILLA EXTRA EXTRA 


PASA A La casicia. 13 


an 


Ordenando cosas 


Escrito en BASIC, el anterior proceso sería así: 


10 LETA=9 
20 LETB=3 
30 PRINTA;B 
40 LETE=A 
50 LETA=B 
60 LETB=E 
70 PRINTA;B 


De esta forma se intercambian los valores de A y B sin 
perder ninguno de ellos, 


Puedes comprobarlo fácilmente. Si ejecutas el progra- 
ma verás como el ordenador imprime: 


Con las líneas 40, 50 y 60 has intercambiado los valores 
de las variables A y B. Este truco es muy importante pues 
es la clave para poder desarrollar todos los programas que 
te explicamos a continuación. También podías haber escri- 
to estas líneas utilizando una sola línea: 


40 LETE=A:LETA=B : LETB=E 


Sigamos pues analizando el proceso que interrumpimos 
en la página 103 cuando ARTURO nos avisó que lo está- 
bamos haciendo mal. Vamos a empezar otra vez pero utili- 
zando una casilla extra (E). El ordenador actúa así: 


B C E 


LA CASILLA 
EXTRA ESTK 
VALIA, 


1% PASO 


Toma A (que vale 9) y lo compara con B (que vale 3). 
Como B es menor tiene que intercambiarlo con A. Siguien- 
do el proceso que vimos antes, pasa el valor de A (que vale 
9) a la casilla extra E. 


Ahora coge el valor de B (que vale 3) y lo pasa a la casi- 
lla A (que ahora está vacía). 


alaalo 


KK» 


Luego pasa el valor de la casilla extra (que ahora es 9) a 


la casilla B. 
A B E 


sb 


Al terminar este paso el ordenador ha comparado el 
primero y segundo elementos y ha colocado en la variable 
A el menor de ellos. 


C 


22 PASO 


Toma A (que ahora es 3) y lo compara con C (que vale 
5). Como A es menor que C, no tiene que intercambiarlos. 
Ya hemos fijado que el elemento menor es 3, pues ya lo 
hemos comparado con los otros dos. La variable A tiene 
ahora el menor valor. 


FixADO A. 
SEGUIMOS . 


3" PASO 


Toma B (que ahora es 9) y lo compara con C (que vale 
5). Como C es menor tiene que intercambiarlo con B. Pasa 
el valor de B (que vale 9) a la casilla extra. 


A B € E 
10 EJ] 
A 


Ahora coge el valor C (que es 5) y lo pasa a la casilla B 
(que ahora está vacía). 


A B (A E 
[][>]) 
SY 
Luego pasa el valor de la casilla extra (que ahora es 9) a 


la casilla C. 
A B C E 
ls 11] 
Wa” 


Ya hemos colocado los tres números de menor a mayor. 


Todo este 


ser parecido á 


10 
20 
30 
40 
50 
60 
70 
80 


Ordenando cosas 


roceso escrito en forma de programa, podría 
éste: 


INPUT A, B,C 
IFA>B THEN LET E=A: LETA=B: LETB=E 


PR 


NTA 0 BO 


IFA>C THEN LETE=A:LETA=C:LETC=E 


PR 


NTAJU “Bi0 0 


IFB>CTHEN LETE=B: LETB=C: LET C=E 


PR 
EN 


ATA: Bro 0 


D 


Estarás pensando que el programa resulta un poquito lar- 
go para ordenar solamente 3 números. Si tuviéramos que 
ordenar 100 números, nos resultaría más cómodo ordenar- 
los a mano. Así que tendremos que pensar algo... 


ESTO NO ES PROBLEMA 
PARA NOSOTROS. 
vTiticemos DIM 


¡Es cierto! Con DIM podemos hacerlo mucho más fá- 


cil. Tú ya sabes cómo utilizarlo,así que vamos a analizar el 
programa poco a poco. 


Primero escribe: 


10 CLS 

20 INPUT “CUANTOS NUMEROS QUIERES ORDE- 
NAR?”;N 

30 DIMA(N) 


40 FORI=1TON 

50 INPUT “DIME UN NUMERO Y PULSA ENTER””;A (1) 
60 PRINTA (1);% *; 

70 NEXT! 

75 PRINT : PRINT 


Te recuerdo que con la instrucción DIM de la línea 30 
preparas al ordenador para que reserve en su memoria N 
casillas, que es el número de variables que vamos a utilizar. 


Y CON El BUctLE 
DELAS tinems 40 ao 
PIDE Y ESCRIBE LoS VALORES 
QUÉ ASIGNAREMOS A ESAS 
VARIABLES. 


Por ejemplo, corre el programa y dale a N el valor 5. El 
ordenador va a comparar 5 números. Con el bucle iniciado 
en la línea 40 el ordenador recibirá los 5 valores que tú me- 
tas a través del teclado y los irá asignando a las variables. 
Por ejemplo, introduce esta serie de números: 5-9-2-3- 1. 


Ordenando cosas 


El ordenador los asignará de esta forma: 


A(1)=5 
A(2)=9 
A (3)=2 
A (4)=3 
A(5)=1 


El ordenador te los escribirá en pantalla. 


Seguimos. Presta mucha atención, porque ahora vienen 
unas líneas que son muy bonitas: 


80 FORI=1TON-1 

90 FORJ=I1+1TON 

100 IF A(>A (J) THEN LET E=A (1): LETA (1) = 
=A (3): LETA(J) =E 

110 NEXTJ 

120 NEXT! 


Muy INTERESANTE ... 


1 TOMARA y 

0EAaAL 'RLORES 
J TOMARA' VALORES 
DE 205 


Ya conoces cómo funciona la línea 100 porque es don- 
de el ordenador compara e intercambia valores ayudándo- 
se de la casilla extra. 


O 


Fíjate que los valores que compara son A (I) y A (J). 
Con las líneas 80 y 90 iniciamos unos bucles que darán res- 
pectivamente valores a A (I) y A (J). Estos bucles están 
muy bien pensados. Verás. El bucle que empieza en la lí- 
nea 90 está anidado dentro del bucle que empieza en la 
línea 80. Así que mientras | vale 1, J irá tomando sucesi- 
vamente los valores 2, 3, 4 y 5. 


CLARO. PORAVE EN 

LA LÍNEA q0 LE DECIMOS 

AL ORDENADOR QUE J 

EMPEZARA: VALIENDO 
+4 


Y ESO NOS PERMITE 
HACER LAS COMPARACIONES 
EN LA LÍNEA 400 


J 


Fíjate otra vez en la línea 100. Primero compara A (1) 
con A (2) o sea, 3 y 9, e intercambiará sus valores si es ne- 
cesario. Sigue a la línea 110 y toma el siguiente valor de J. 
Ahora compara A (1) con A (3), y así sucesivamente... 


Cuando J ya vale 5, llega a la línea 120 y toma el siguien- 
te valor de I (que es 2). Ahora comparará A (2) con A (3) 
y así sucesivamente... 


0) 


¡Ojo! Cuando el ordenador compara A (1), A (2), etc... 
lo que compara en realidad son los valores que A(1), A(2), 
etc... tienen en ese momento. 


ESTO ES LO MAS 
IMPORTANTE 10. 

$i T TOMA EL VALOR 4 
y d TOMA EL VALOR 2 
EL ORDENADOR ESTÁ 
LOMPARANDO 
A(A)= 5 con A(2): 9 


Utilizamos I y J únicamente para marcar el subíndice y 
así poder comparar el primer elemento de la serie con el 
segundo y siguientes y luego el segundo con los siguientes, 
etc. 

l Solamente nos falta añadir unas líneas para que nos im- 
prima los resultados. Escribe: 


130 FORI=1TON 
140 PRINTA (1); ”; 
150 NEXT! 

160 END 


NOTAS PARA EL ADULTO 


e Los conceptos vertidos en este capítulo alcanzan ya un 
cierto grado de complejidad. Este capítulo no debe abor- 
darse si no se dominan completamente las técnicas de 
utilización de la instrucción DIM explicadas en el capí- 
tulo anterior. 


Si lo considera oportuno, dedíquele más de un día o nu- 
merosas sesiones a este tema, asegurándose de que el ni- 
ño va asimilando paulatinamente las distintas fases del 
proceso de comparación y ordenación de elementos, 


Es importante que vea la diferencia entre el proceso nor- 
mal de ordenación y el proceso del computador, que re- 
quiere la utilización de una casilla o variable extra. Ase- 
gúrese de que el niño ha captado la forma de utilización 
de la variable extra. 


Haga ver al niño que el ordenador siempre comparará el 
primer elemento de una serie con todos y cada uno de 
los restantes, para fijar la posición definitiva de ese ele- 
mento (en nuestro caso, el menor). Una vez fijado el 
menor de todos, comenzará de nuevo el proceso con el 
siguiente elemento de la serie. 


0 La clave del programa radica en la estructura de las líneas 
80 a 120. Dediquen todo el tiempo que sea necesario a 
la comprensión de los dos bucles. Repasen si es preciso 
los capítulos anteriores sobre FOR/NEXT y DIM. 


Recalque que las variables I y J de dichos bucles sirven 
únicamente para definir A (1), A (2), A (3)... y para que 
el ordenador pueda comparar sus valores. No obstante, es 
muy importante significar que A (1), A (2), etc... tienen 
cada una su valor, que ha sido asignado a través del te- 
clado al ejecutar el programa. 


En nuestro ejemplo hemos ordenado los números de me- 
nor a mayor. Para ordenar de mayor a menor, basta con 
cambiar el operador de relación >por el operador de re- 
lación <en la línea 100. 


Recordarás que con INT obteníamos la parte entera de 
un número. Vamos a recordarlo con un programa: 


10 FORA=10T0 100 STEP 10 
20 LETB=A/2.34 

30 PRINTB 

40 NEXTA 


Este programa toma números de diez en diez, los divide 


entre 2,34 e imprime el resultado. Como podrás ver al co- 
rrer el programa, los resultados son números decimales. 


Si utilizamos INT, podemos quitar la parte decimal. 
Añade la línea: 


25 LETC=INT (B) 
Y cambia la línea 30 así: 


30 PRINTB;” ”;C 


Ejecuta el programa. Te queda solamente la parte ente- 
ra de los resultados. Sin embargo, muchas veces es mejor 
redondear hacia arriba o hacia abajo en lugar de quitar la 
parte entera. 


¡Claro! Suponte que los datos que estemos utilizando 
sean importantes en algún cálculo. El número 29,9145299 


es casi 30, pero con INT lo dejamos en 29. 


¿cOmO PODEMOS 
REDONDEAR ? 


Es muy fácil. Solamente tenemos que sumar 0,5 al nú- 
mero antes de quitarle la parte decimal. Por ejemplo: 


42.7350427 Como el número está cerca de 43, 
0.5 al sumarle 0.5 


43.2350427 — se pasa de 43 
INT (43.2350427) y con INT queda sólo 43 


34.1880342 Como el número está cerca de 34 
0.5 al sumarle 0.5 


34.6880342 no llega a 35 
INT (34.6880342) y con INT se queda en 34. 


Modificando el programa de acuerdo a esta regla, añadi- 
ríamos: 


27  LETR=INT (B +0.5) 
5 PRINT “DECIMAL”; * ”; “ENTERO”; “ ”; “RE- 


DONDEADO” 
AS QUEDA 
MAS BONITO 


Al correr el programa tendrás una pantalla con tres co- 
lumnas: 


y cambiaríamos la línea 30 por: 


30 PRINTB;* %C;% “R 


Número Decimal Parte Entera Número Redondeado 


4.27350427 4 4 
8.54700855 8 9 


Observa las diferencias entre una columna y otra. 


NOTAS PARA EL ADULTO 


Este capítulo no se ha limitado a comentar la función 
INT (ya conocida) sino una forma de utilizarla. Mucho 
más importante que su dominio o eventual aplicación 
posterior es el hecho de que el niño comprenda que uti- 
lizando nuestra imaginación hemos podido transformar 
la forma de trabajar de una función conocida en otra 
acorde a nuestros intereses. 


En efecto, la fórmula general LET A =INT (X +0,5) es 
equivalente a una supuesta nueva función en BASIC que 


automáticamente redondearía cualquier número. 


De esta forma, podemos continuar combinando determi- 
nadas funciones del BASIC con expresiones matemáticas 
sencillas para buscar nuevas aplicaciones o soluciones a 
problemas concretos que pudieran surgir en el transcur- 
so de nuestros programas. 


Así, si tuviéramos que determinar dentro de un programa 
cuándo un número entero es par o impar, utilizaríamos 


la fórmula: 


10 IF INT (X/2) + 2 =X THEN PRINT “ NUME- 
ROPAR” 


la cuál se explica por sí sola. 


O Aparte de INT y RND existen otras funciones numéricas 
que no se mencionan pues rara vez serán utilizadas por 
el niño a este nivel, Resumimos a continuación la aplica- 


ción de dichas funciones: 


Indica el signo de 


Indica el valor abso- 
luto de un número 


SGN (3) hará aparecer 
en pantalla 1 

SGN (-2) hará aparecer 
en pantalla —1 

SGN (0) hará aparecer 
en pantalla 0 


ABS (7) hará aparecer 
en pantalla 7 
ABS (7) hará aparecer 
en pantalla 7 


Halla la raiz cuadra- 
da de N 


A 


SQR (9) hará aparecer 
en pantalla 3 
a) 


e El BASIC ofrece también diversas funciones logarítmi- 
cas, exponenciales y trigonométricas que facilitan consi- 
derablemente trabajos de cálculo. No se citarán en este 


libro. 


Aparte de las instrucciones (PRINT, IF, GOTO, LET, 
FOR/NEXT, READ ...) hasta ahora hemos conocido tam- 
bién funciones numéricas como INT o RND. 


Vamos a conocer ahora algunas funciones de cadena o 
funciones que trabajan con textos. Son muy útiles, pues 
con ellas el BASIC te permite trabajar con palabras, fra- 
ses, etc. 

No las vamos a explicar todas. Solamente las que ahora 
te pueden resultar más interesantes. Además, no profundi- 
zaremos mucho en ellas. Lo principal es que sepas cómo 
funcionan y para qué pueden servir. 


LEN nos dice el número de caracteres que tiene una Ca- 
dena. Por ejemplo: 


10 LETAS="BASICPARA NIÑOS” 
20 PRINTLEN (AS) 


Al correrel programa, en tu pantalla aparecerá el número 
16. LEN ha contado todos los espacios de la cadena alfa- 
numérica AS, incluidos los espacios en blanco. 

LEN puede ser muy útil cuando quieras subrayar una 
palabra que previamente no conoces. Por ejemplo, teclea: 


10 INPUT “ESCRIBE TU NOMBRE”; AS 
20 PRINTAS 
30 FORN=1T0 LEN (AS) 


40 PRINT“-"; 
50 NEXTN Lo) 


Toda la cadena aparecerá subrayada. 


GRACIAS A LEN, 
CON ESTE GucLE 
IMPRIME TANTAS 
KAYITAS COMO CARACTERES 
TUENE TU NOMBRE 


SE 

Estas funciones nos permiten obtener unos caracteres 
concretos sacándolos de una cadena. Por ejemplo LEFT$ 
extrae los caracteres que tú le indiques, empezando a con- 
tar por la izquierda de la cadena. RIGHTS hace lo mismo, 
pero empezando por la derecha. Veamos un ejemplo: Te- 
clea: 


e 


10 LETAS=“ARTURO” 
20 PRINTLEFTS (AS, 2) 


Corre el programa y en la pantalla aparecerá AR. 


Añade la línea 30: UR0 | 


RIGHT 4(AS, 3) cursRE 
DECIR GUE SE YOMARÁN 105 TRES 
OLVIMOS CARACTERES DE LA 
CADENA EMPEZANDO PUR LA 
DERECHA. 


30 PRINT RIGHTS (AS, 3) 


LEFT 9(A3,2) avieRe DECIO 
QUE EL ORDENADOR TOMARH LOS DOS 
PRIMEROS CARACTERES DÉ LA 
CADENA EMPEZANDO POR LA IZQUIERDA, 


En pantalla aparece también URO. 
Hagamos un ejemplo de aplicación más útil: 


10 INPUT “ ESCRIBE UN VERBO EN INFINITIVO. 
YO TEDIRE AQUE CONJUGACIÓN PERTENECE”; 
AS 

20 LETB$=RIGHT$ (AS, 2) 

30 IF B$="AR” THEN PRINTAS;” ";“ESDELA 
PRIMERA” 

40 IFB$="ER” THEN PRINTAS;” ”¿“ESDE LA 
SEGUNDA” 

50 1FB$="IR" THENPRINT AS; * ”;“ESDELA 
TERCERA” 


e 


Fíjate que en la línea 20 asignamos a la variable BS el 
valor de los dos últimos caracteres de la variable AS. En in- 
formática se dice que BS es una subcadena de AS. 


MIDS es una función más perfeccionada que las ante- 
riores. Fíjate en el ejemplo: 


Mio 9 (A4,2,3) 
GoleRE DECIR GUE EL 
ORDENADOR TOMARA A 

PARTIR DEL o 

e 
ACTES 0E LA 
CADENA 


10 LETAS="ARTURO” 
20 PRINTMIDS (AS, 2,3) 


CAS" qa] 


Al ejecutar el programa en tu ordenador aparecerá RTU. 


Ya conoces como funcionan LEN, LEFTS, RIGHTS, y 
MIDS. Vamos a hacer un programa fenomenal combinan- 
do dos de estas funciones. Teclea: 


10 INPUT “ESCRIBE UN TEXTO LARGO”; A$ 
20 CLS 

30 LETL=LEN (A$) 

40 FORN=1TOL 

50 PRINTMIDS (AS,N, 1); 

60 FORX=1T0 50: NEXT X 

70 NEXTN 


En la línea 30 la variable L va a tomar como valor el nú- 
mero de caracteres de tu texto, incluidos los espacios en 
blanco. : 


En la línea 40 se inicia un bucle en el que N valdrá desde 
1 hasta el número total de caracteres de tu texto. 


En la línea 50 el ordenador toma de uno en uno los 
sucesivos caracteres de tu texto, empezando por el prime- 
ro (puesto que N empieza valiendo 1) y los imprime uno 
al lado del otro. 


El bucle de retardo de la línea 60 marcará la velocidad 
con que aparecerá tu texto en la pantalla. 


Esta función nos permite asignar un valor a una variable 
alfanumérica a través de nuestro teclado sin necesidad de 
pulsar ENTER o RETURN después de hacerlo. 


Por ejemplo, escribe: 


5 PRINT“PULSA CUALQUIER TECLA” 
10. LETAS=INKEY$: IF AS=" "THEN 10 


Con esta línea el ordenador espera un valor que tú darás 
a través del teclado y que será asignado a la variable AS. 


e) 


En la segunda sentencia de la línea 10 le decimos al orde- 
nador que mientras A$ no valga nada (es decir, mientras no 
pulses una tecla del teclado) continúe esperando en esa 
misma línea. Sigue: 


20 PRINT “PULSASTE LA TECLA ...”; A$ 
30 GOTO5 


Corre el programa y prueba pulsando varias teclas. Verás 
que no es necesario pulsar ENTER para que el dato quede 
introducido en el programa. 

El truco de la línea 10 es además muy práctico para pa- 
rar un programa mientras se está ejecutando y que no con- 
tinúe hasta que pulsemos una tecla. 


¿Recuerdas el programa del AJEDREZ de la página 29? 


Con las líneas 10, 90 y 100 hacíamos que el ordenador 
imprimiera en pantalla los granos de cada nueva casilla siem- 
pre que tú teclearas S y después ENTER o RETURN. 

Con INKEYS podemos hacer el programa más cómodo. 
Cambia las líneas 10 y 80 por: 


10 PRINT” PULSA CUALQUIER TECLAPARA 
OTRA CASILLA” 
80 LETAS=INKEY$: IFAS=" "THEN 80 


Quita las línea 90 y 100 del programa antiguo. El resul- 
tado es el mismo y la ejecución del programa más cómoda. 


Puedes hacer lo mismo con el programa de la página 57, 
que nos daba la tabla de multiplicar (cambia la línea 90). 


NOTAS PARA EL ADULTO 


e Sisa los ejemplos con el niño. En principio, éste no debe 
encontar ninguna dificultad especial en la comprensión 
de los programas expuestos y en el empleo de las funcio- 
nes mencionadas. 


Algunos ordenadores (SINCLAIR) utilizan una expre- 
sión simplificada de las funciones LEFTS, RIGHTS y 


MIDS. Así, considerando AS = “ARTURO”: 


PRINT AS (2 TO 4) escribirá RTUR 
PRINT AS (3) escribirá T 

PRINT AS (TO 4) escribirá ARTU 
PRINT AS (3 TO) escribirá TURO 


Así, la línea 20 del programa de la página 123 se es- 
cribirá: 


20 LET B$=A$ (LEN A$ — 1 TO) 


la cual asigna igualmente a B$ los dos últimos caracteres 
de la variable A$. 


Igualmente, la línea 50 del programa de la página 124 se 
escribirá: 
50 PRINT AS (N); 
Tenga en cuenta también que deberá variar la colocación 
de los paréntesis en función del ordenador que utilice. 
Existen otras funciones de cadena, —cuya explicación 
escapa a los objetivos de este libro — como serían: 
VAL(A$) Convierte la cadena numérica A$ en su va- 
lor numérico, 
Ejemplo: 
10  LET AS ="234” 


20 LETA=VAL(AS) 
30 PRINTA 


En la pantalla aparecerá 234, pero no como cadena, sino 
como número, 


STRS (A$) Convierte un número en una cadena de ca- 
racteres numéricos. Permite así aprovechar 
en un número las ventajas del tratamiento 
de textos a través de las funciones de ca- 
dena. 


Ejemplo: 


10 LETA=234 
20 LETAS$=STRS(A) 
30 PRINT AS 


En la pantalla aparecerá 234, pero no como número, sino 
como cadena. Prueba de ello es que añadiendo la línea: 


40 PRINT RIGHTS (AS, 2) 
El ordenador escribirá: 


234 
34 


En algunos ordenadores, la función INKEYS se suple 
con la función equivalente GET. Aunque en sí, esta fun- 
ción no es una función de cadena, se emplea fundamen- 
talmente en el tratamiento de cadenas. Así, GET permi- 
te introducir un carácter numérico y GETS un carácter 
alfanumérico. Obviamente, se suele utilizar más frecuen- 
temente esta última, ya que de este modo el ordenador 
acepta cualquier tecla que se pulse, 


Esta función adopta la forma: 


10 GETAS 


Todos los números, letras, sígnos, etc, que aparecen en 
el teclado de tu ordenador se corresponden con unos nú- 
meros que tiene el ordenador memorizados. 


La relación entre números y caracteres se llama código. 
Este código puede cambiar de un ordenador a otro. 

Las funciones CHR$ y ASC nos permiten ver la rela- 
ción que existe entre esos números y los símbolos o carac- 
teres del teclado. 

Por ejemplo PRINT ASC (“A”) nos dará el número de 
código que tiene el carácter “A” en tu ordenador. 


PRINT CHRS (65) nos dará el carácter que correspon- 
de al número 65 en el código de tu ordenador. 


e Y ESo, PARA 
Que SIRVE ? 


A veces es conveniente conocer la relación entre el carác- 
ter y el número de código. Vamos a ver un ejemplo, ha- 
ciendo un programa para jugar. 


Antes que nada, vamos a ver cuál es el código de tu or- 
denador. Teclea: 


265 ES El NUMERO DE 
CARACTERES QUE MAS O 
MENOS PUEDE TENTR EL 
CÓDIGO DE Ty ORDENADOR 


10 FORN=1T0 255 


20 PRINTCHR$S(N),N 
30 NEXTN 


Si no te da tiempo a verlos todos, añade un bucle de 
retardo: 


25 FORI=1T0 200: NEXT I 


Corre el programa. En la columna de la izquierda te apa- 
recerán los símbolos, números, caracteres y letras de tu te- 
clado. En la columna de la derecha, sus correspondientes 
números de código. 


Fíjate, por ejemplo, en el número de código que tienen 
las letras del abecedario. Posiblemente en tu ordenador las 
letras del abecedario se correspondan con los números 65 
hasta el 90. 


PERO NERIEÍCALO, PARA 


* 


Ahora vamos con el juego. Primero lo haremos con las 
instrucciones que ya conocemos. Teclea: 


10 LETA=INT( RND (X)+* 10) 
20 INPUT” HEPENSADOUNNUMERO DEL 1AL 10. 
ADIVINALO. ESCRIBE TU NUMERO”; Z 


30 IFA<>ZTHEN 20 
40 PRINT“ACERTASTE” 


Este es un juego muy sencillo que sin duda ya entiendes. 


Pero suponte que en lugar de jugar a adivinar números 
queremos que el ordenador piense en una letra. De alguna 
manera tenemos que decírselo. 


¡Claro! CHRS transformará los números de código que 
le demos en sus correspondientes caracteres. Como sabe- 
mos que, en nuestro ejemplo, las letras del alfabeto van 
dentro del código desde el número 65 al 90, escribiremos: 


¿CÓMO HAREMOS PARA 
QUE NOS PIENSE 
LETRAS AL AZAR? 


10 LETA=INT (RND (X) x 26) + 65 
15 LETAS=CHRS(A) 


Fíjate en estas líneas. En la línea 10, hacemos que 
RND (X) + 26 genere números al azar entre 1 y 25 (que es 
el número de letras que tiene el alfabeto). 


Después a ese número le sumamos 65 porque la letra A 
se corresponde con el número 65 del código. Así, al sumar 
65 al número obtenido con RND, obtendremos al azar 
números comprendidos entre 65 y 90. 


Con CHRS hacemos que el ordenador transforme dicho 
número de código a su letra correspondiente. 


Añade: 


20 INPUT “HE PENSADO UNA LETRA DEL ABECE- 
DARIO. INTENTA ADIVINARLA. ESCRIBE TU 
LETRA”; Z$ 

30 IFAS$<>Z$ THEN 20 

40 PRINT“ACERTASTE” 


Al correr el programa, el ordenador tomará al azar una 
letra cualquiera del abecedario. Como ves, CHR$ puede ser 
útil. 


TODO TIENE 
SS 


Puedes completar el programa añadiendo contadores 
que te digan cuánto tardas en adivinarlo, dando puntua- 
ciones, etc. Esto ya sabes como hacerlo. 


NOTAS PARA EL ADULTO 


e Estas instrucciones no serán frecuentemente utilizadas 
por el niño, pero las incluímos a fin de que, al menos, le 
resulten familiares. Al mismo tiempo se ha efectuado una 
introducción al código ASCII, que es un código interna- 
cional utilizado para representar informaciones alfanu- 
méricas. 


El código ASCII está estandarizado y las informaciones 
alfanuméricas fundamentales suelen tener siempre el mis- 
mo código en todas las computadoras. No obstante, algu- 
nos fabricantes introducen ligeras variaciones pox,lo que le 
sugerimos que antes de abordar los programas de este ca- 
pítulo consulte el manual de instrucciones de su compu- 
tador, corra el programa de la página 131 o teclee PRINT 
ASC (“A”) y PRINT ASC (“Z”) para determinar el có- 
digo del alfabeto de su ordenador, 


6 No olvide que no todos los ordenadores expresan de 
igual forma la instrucción RND. Posiblemente su orde- 
nador precise escribir la línea 10 así: 


10. LETA=RND (25) +65 
o bien: 
10 LET A=INT (RND + 25) +65 
e Algunos ordenadores utilizan la función CODE en lugar 
de ASC. En cualquier caso no olvide que esta función 


nos indicará el número de código correspondiente al pri- 
mer carácter de la expresión alfanumérica. 


Así: 


ASC (“ANTONIO”) =65 
ASC (“A”) =65 


0 Por otra parte, algunos ordenadores escribirán: 


ASC “ANTONIO” en lugar de ASC (“ANTONIO”) 
CHR$ 65 en lugar de CHRS (65) 


Después de leer este libro tú sabes ya muchas cosas so- 
bre el BASIC. Serás capaz de hacer programas bastante 
amplios. Te gustará que tus programas sean buenos, fun- 
cionen, sean cómodos de utilizar, estén escritos con lógica... 


Cuando ARTURO empezó a programar, tuvo algunas 
dificultades. No todos sus programas funcionaban a la pri- 
mera. En la pantalla le aparecían avisos de error, etc. 


Eso ES NORMAL 


y ATÍTE PASARA' 
LO MISMO 


En realidad, sólo con la práctica se consigue poco a po- 
co programar con mayor seguridad. De todas formas, va- 
mos a darte algunos consejos para que tus programas sean 
realmente buenos. 


e Antes que nada conviene que tengas muy claro qué es 
lo que quieres hacer, Cuanto más domines un tema, más 
fácil te será hacer un programa relativo a ese tema. 


e 


e Después te resultará útil hacer un diagrama de flujo. 
Con ello tendrás una visión general de cómo va a ser tu 
programa. 


e Puede resultarte cómodo escribir las partes más compli- 
cadas del programa en un papel antes de pasarlo al ordena- 
dor. 

e A] teclear tu programa debes tener cuidado cuando es- 
cribas los números de línea, para no repetirlos y evitar así 
que sin querer borres una de ellas. 


ESCRIBE BIEN Las 
iNSTRUCUONES ¡ LoS 
SIBNOS , Los 
PARENTESIS, ETC, 


e Ten mucho cuidado para no confundir las variables en- 
tre sí, y tampoco las numéricas y las alfanuméricas. Utili- 
za variables que te recuerden a lo que representan. Por 
ejemplo, LS para Libros, R$ para Ropa, N para números, 


etc. 
E 


e Recuerda que todas las sentencias FOR tienen que tener 
una sentencia NEXT. 


6 Vigila las instrucciones que le das al ordenador para que 
en un IF .., THEN vaya a la línea de programa adecuada. 


O No te olvides de poner líneas “chivatas” para detectar 
los posibles errores de entrada de datos a través del tecla- 
do, Con ellas se detectan los errores justo después de ha- 
berlos cometido. 


e Cuando introduzcas cambios, lista el programa para ver 
si el ordenador te los ha admitido correctamente, de la for- 
ma y en el lugar que querías. 


e También es muy importante que tu programa quede 
muy claro para que pueda ser entendido por alguien que 
no lo haya escrito. Pon muchas sentencias REM para acla- 
rar las cosas. Tú mismo las agradecerás cuando vuelvas a 
mirar el programa después de un tiempo. 


e Finalmente debes hacer que tu programa pueda ser uti- 

lizado muy fácilmente por cualquiera. Mete en el prógra- 
ma un menú que indique muy claramente las posibles 
opciones y los pasos a seguir. 


MENU 
A. COMPRAR UN LIBRO 
le... COMPRAR OTRO LIBRO 
3.... COMPRAR UTRO LIBRO 


e Tus sentencias PRINT deben ser muy claras. Por ejem- 
plo, es mejor poner ¿CUANTOS CARAMELOS TIENE 
ARTURO? que poner ESCRIBA CARAMELOS. 


Es mejor poner “EL RESULTADO DE LA MULTIPLI- 
CACION ES ...” que poner “RESULTADO ...” 


En fin, tú mismo irás aprendiendo con el tiempo cómo 
hacer programas perfectos. 


PRUEBA TUS REFLEJOS 


Con este juego podrás probar tus reflejos. Intenta ganar 
a nuestro amigo ARTURO (que está muy entrenado). Y no 
te pongas nervioso... 


10 
20 


30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 


CLS 

LET 0$ ="“PRUEBA TUS REFLEJOS. TE MOSTRA- 
RE UNA LETRA UN INSTANTE. EL TIEMPO EM- 
PEZARA A CORRER, Y SE PARARA CUANDO 
PULSES ESA LETRA. COMPITE CON TUS AMIGOS. 
EL QUE MENOS PUNTOS TENGA, GANA”, 

LET L=LEN (0$) 

FORN=1TOL 

PRINT MIDS (0$, N, 1); 
FORW=1T0 20: NEXT W 

NEXT N 

FOR Z=1T0 1000: NEXT Z 

RANDOMIZE 

LETX=0 

LETN=INT (RND (0) + 25) +65 

LET AS=CHRS (N) 

PRINT: PRINT 

PRINT AS 


150 
160 


170 
180 


190 
200 
210 


220 
230 
240 
250 


260 


FOR Z=1T0 100: NEXT Z 

LET B$=INKEYS : LETX=X +1: PRINTX: 
CLS:IFB$="" THEN 160 

IF B$=AS THEN 200 

IF B8<> AS THEN PRINT “ FALLASTE. INTEN- 
TALO DE NUEVO” 

FOR Z=1T0 200 : NEXT Z: GO TO 90 

PRINT X : PRINT “TU PUNTUACION ES ”;X 
PRINT: PRINT: PRINT: PRINT: PRINT “¿OTRA 
VEZ? (S/N)” 

LET R$=INKEYS : IF R$=" "THEN 220 

IF R$="“S” THEN 90 

IF RS="“N” THEN STOP 

IFR$<>"S” AND RS<>"“N" THEN PRINT 
“CONTESTA BIEN” 

GO TO 210 


NOTAS PARA EL ADULTO 


e De la línea 10 a la línea 70 se escribe “artísticamente” 
el texto de presentación en la pantalla. De la línea 90 a 
la línea 140 se generan aleatoriamente las letras del alfa- 
beto, y se pone el contador a Cero. 


De la línea 160 a la 180 el ordenador analiza la tecla pul- 
sada y hace correr el marcador. De la línea 210 en ade- 
lante el ordenador permite volver a empezar. 


Conviene que añadan a este programa sentencias REM 
para aclarar los distintos pasos que sigue el ordenador. 


En este programa se practican de manera especial los bu- 
cles de retardo, las funciones MIDS, INKEYS y CHR$ y 
LEN, así como INT y RND. En algunos ordenadores, la 
línea 50 deberá escribirse así: 

50 PRINT Q$ (N); 


y la línea 110 —que variará en función de su ordena- 
dor— se escribiría: 


110  LET N=INT(RND + 25) +65 
o también 


110. LETN=RND (25) +65 


EL JUEGO DE LOS ESPIAS 


Como ya has visto en las páginas anteriores, a nuestro 
amigo ARTURO le gusta mucho hacer de espía. Incluso ha 
desarrollado un programa para comunicarse en clave con 
su Cuartel General. 


El sistema es muy sencillo. Cuando manda un mensaje, 
lo hace en un código especial. A cada letra del alfabeto le 
suma 5, y la letra que resulta es la que escribe. Así, en lu- 
gar de escribir una A, escribiría una F. 


A BL € DD E PP 6 $4 
1 2 3 4 S 6 7 8 


Cuando en el Cuartel General reciben un mensaje de 
ARTURO, lo que hacen es restarle 5 a cada letra del men- 
saje para poder entenderlo. 

Logicamente, lo hacen con un ordenador, por ser más 
rápido. Tú mismo puedes establecer con tus amigos un sis- 
tema de mensajes en clave. Lo único que tienes que tener 
en cuenta es que hay que utilizar el mismo modelo de or- 
denador para luego poder descifrarlos. 


El programa para codificar automáticamente los mensa- 


jes sería: 
10 INPUT “ESCRIBE UNA FRASE”; F$ 


20 INPUT “INDICA LA CLAVE”; C 
30 FORX=1T0 LEN FS 


xtt% 


35 LETAS=MID $ (FS, X, 1) 25% 

40 LETZ=ASC (AS) + C SXUNF Co 

50 PRINTCHRS (2); G2FSNANRT 

60 NEXTX y) 

70 PRINT O 
El programa para descifrarlos sería: Q 

o 
10 INPUT “ESCRIBIR FRASE CODIFICADA”; FS 


20 INPUT “CLAVE SECRETA”; C 
30 FORX=1T0 LEN FS 
35 LETAS=MID $ (FS, X, 1) 
40 LETZ=ASC (A$) —C 
50 PRINTCHRS (2); 
60 NEXTX 
En los ordenadores de SINCLAIR tendrás que cambiar 
la línea 35 por: 


35 LETAS=FS (X TO) 
y utilizar CODE en lugar de ASC. 


Establece con tus amigos tu propio número de clave se- 
creto y nadie podrá descubrir vuestros mensajes... 


Claro que hay que tener mucho cuidado ... Si los Servi- 
cios de Contraespionaje conocen vuestro sistema de códi- 
gos, pueden averiguar incluso la clave con un programa 
como el que acabamos de ver, cambiando la línea 20 por 


20 FORC=1T024 


y añadiendo las líneas 


70 PRINT 
80 NEXTC 
90 STOP 


Con ello el ordenador escribe en pantalla todas las posi- 
bles frases en clave. De ellas, una tendrá sentido. Intenta 
descubrir lo que dice ARTURO en la página anterior, uti- 
lizando este sistema de los servicios de contraespionaje. 


UNA LIGA DE BALONCESTO 


Como te habfamos prometido antes, haremos un pro- 
grama muy sencillo para organizar una liga de baloncesto. 
ARTURO organizó su campeonato y este programa le fue 
muy útil pues con él tuvo la seguridad de que no se olvida- 
ba de incluir ningún partido. Participaban solamente tres 
equipos. 


La liga de ARTURO quedó así: 


PARTIDOS DE LA LIGA 


ROMPETECHOS contra LARGUIRUCHOS 
ROMPETECHOS contra TROTAMUNDOS 
LARGUIRUCHOS contra ROMPETECHOS 
LARGUIRUCHOS contra TROTAMUNDOS 
TROTAMUNDOS contra ROMPETECHOS 
TROTAMUNDOS contra LARGUIRUCHOS 


PESO 


- 
FIRALHIAS 


El programa sería: 


10 
20 
30 
40 
50 
60 
70 
80 
90 
100 


FORA=1T03 
FORB=1T03 

IFB=A THEN GOTO 100 
LETE=A 

GO SUB 200 

PRINT ” contra *; 
LETE=B 

GO SUB 200 

PRINT 

NEXT B 


110 
120 
200 
210 
220 
230 


NEXT A 

sToP 

IFE=1 THEN PRINT “ ROMPETECHOS”; 
IF E=2 THEN PRINT “ LARGUIRUCHOS”; 
IFE=3 THEN PRINT “TROTAMUNDOS”; 
RETURN 


Este programa solamente te serviría para organizar una 
liga como la de ARTURO. Si quieres organizar tu propia li- 
ga, puedes incluir el número de equipos que desees, utili- 
zando la instrucción DIM, que conocimos en la página 86. 


El programa sería: 


5 
10 
20 
30 
40 
50 
60 
70 
80 
90 


INPUT “CUANTOS EQUIPOS”; N 

DIM AS (N) 

FORJ=1TON 

PRINT “ESCRIBE EL EQUIPO NO.”; J 
INPUT AS (J) 

CLs 

NEXTJ 

CLS 

PRINT “PARTIDOS DE LA LIGA” 
PRINT 


100 FORX=1TON 

110 FORY=1TON 

120 IF X=Y THEN GOTO 150 
130 PRINTAS (X); “ contra ”; 
140 PRINTAS (Y) 

150 NEXTY 

160 NEXTX 


NOTAS PARA EL ADULTO 


e El segundo programa permite la inclusión del número de 


equipos que se deseen, los cuales deberán ser introduci- 
dos a través del teclado durante la ejecución del progra- 
ma. 


Algunos ordenadores (por ejemplo, SINCLAIR) exigirán 
una pequeña modificación en la línea 10 del programa, 
para definir el número máximo de caracteres que puede 
tener la variable alfanumérica. Así, se escribiría 


10 DIMAS (N, 12) 


LISTIN TELEFONICO 


Puedes hacerte tu propio listín de teléfonos y direccio- 
nes. Hay varios sistemas, pero el que te ofrecemos a con- 
tinuación es muy simple: 


5 
10 


20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 


2000 
2010 
2020 
2030 


CLS 
INPUT “CUANTOS NOMBRES TIENE TU 
LISTIN2"; M 


PRINT “LISTIN”: PRINT 
PRINT “BUSQUEDA POR :” 


PRINT “NOMBRES ....1” 

PRINT “DOMICILIO” ..2” 

PRINT FIN ........3" 

INPUT “QUE OPCION DESEAS ?”; A 
CLS 


IF A=1 THEN GOTO 2000 

IFA=2 THEN GOTO 3000 

IF A=3 THEN STOP 

PRINT “TECLEASTE MAL TU OPCION ”: 
GOTO 30 

INPUT “ESCRIBE EL NOMBRE”; ES 
RESTORE 

FORX=1TOM 

READ NS, C$, TS 


2040 
2050 
2060 


2070 
2080 
2090 
2100 
2110 
2120 
3000 
3010 
3020 
3030 
3040 
3050 
3060 


3070 
3080 
3090 
3100 
3110 
3120 


IF ES=N$ THEN GOTO 2070 
NEXT X 

FES<>NS THEN PRINT “NO CONOZCO A”; 
ES: GOTO 2000 

PRINT NS: PRINT CS: PRINT TS 

NPUT “OTRO NOMBRE? (S/N) ”; Z$ 
FZ$="S" THEN GOTO 2000 

INPUT “VUELTA AL MENU? (S/N) ”; J8 
IF J8="S" THEN GOTO 30 

STOP 

NPUT “DOMICILIO”; ES 

RESTORE 

FORX=1TOM 

READ N8, CS, TS 

F ES=C$ THEN GOTO 3070 

NEXT X 

FES<>C$ THEN PRINT “NO CONOZCO LA 
CALLE”; ES: GOTO 3000 

PRINT NS: PRINT CS: PRINT T$ 

NPUT “OTRA CALLE? (S/N)”; Z8 
FZ$="S" THEN GOTO 3000 

NPUT “VUELTA AL MENU? (S/N)”; J8 
IF JS="S" THEN GOTO 30 

STOP 


5000 
5010 
5020 
5030 


DATA LUIS, INDEPENDENCIA 345, 2-34-56-83 
DATA FERNANDO, CENTRAL 23, 2-67-98-99 
DATA ANA, PLAZA COLON 3, 2-55-54-42 
DATA ARTURO, AV. DELA INFORMATICA 2, 
D-11-01-10 


Los datos de tus amigos los tienes que introducir a tra- 
vés de sentencias DATA. Recuerda los consejos que te dá- 
bamos en la página 85 sobre las sentencias DATA, Si aña- 
des más nombres, no te olvides de cambiar la línea 10. 


ORDENACION ALFABETICA 


10 
20 


30 
40 
50 
60 
70 


CLS 

INPUT “CUANTOS NOMBRES QUIERES 
ORDENAR?”;N 

DIM AS (N) 

FORI=1TON 

INPUT AS (1) 

PRINT AS (1) 

NEXT | 


80 
90 
100 
110 


120 
130 
140 
150 
160 
170 


PRINT: PRINT 
FORI=1TON—1 
FORJ=I1+1TON 

IF AS (1)>AS (J) THEN LET ES=AS (1): LET 
AS (1) =A$ (J): LET AS (3) = ES 
NEXTJ 

NEXT! 

FORI=1TON 

PRINT AS (1) 

NEXT | 

END 


Este programa te permite ordenar alfabéticamente los 
nombres de todos tus amigos. Como ves, el proceso es el 
mismo que para la ordenación numérica, sólo que en esta 
ocasión utilizamos variables alfanuméricas. 


Como ya has visto en capítulos anteriores, el ordenador 
también clasifica las letras y puede analizar cuál es mayor. 
Con las palabras hace exactamente igual. Primero compara 
la primera letra y si ésta es igual, compara la segunda, etc... 


Por ejemplo, 


ANTONIO <CARLOS 
ARTURO > ANTONIO 


CONTROL DE BIBLIOTECA 


Es muy conveniente que te acostumbres a tener tus 
libros ordenados y clasificados de forma que puedas loca- 
lizarlos con facilidad cuando los necesites. 

El ordenador te puede ayudar mucho en esto. El 
programa que te ofrecemos a continuación es muy efi- 
caz y muy sencillo, aunque sea un poco largo. 


Puedes utilizar hasta dos dígitos para las materias. 
Por ejemplo, 


MEDICINA .......... 14 
LITERATURA .... 21 


y uno para las submaterias. Por ejemplo: 
NOVELAS ..cucio.o.. 2 


Puedes utilizar tu propia clasificación o, mejor, utilizar 
un sistema de clasificación que utilizan muchas bibliote- 
cas. Pídeselo a tu maestro. 


Utilizando la clave para la materia y la submateria po- 
dremos ordenar nuestros libros de manera lógica. Para 
clasificar una novela de un autor español o hispanoameri- 
cano utilizaríamos el código 212. También podemos 
poner el título y el autor. Por ejemplo: 


80 
90 
100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 


FORI=1TON 
READ M8 (1), S$ (1), AS (1), TS (1) 
LETA (1) =LEN (AS (1) 
LETT (1) =LEN (TS (1)) 
FORJ=A (1) +17T020 

LETAS (1) =AS (1) +% " 
NEXTJ 

FOR K=T (1) +1T0 20 

LETTS (M=TS (1) +“ " 
NEXT K 

LET LS (1) =M8 (1) +8S$ (1) +AS (1) +T8 (1) 
NEXT 1 

FORJ=1TON—1 
FORK=J+1TON 

IF LS (3) <L$ (K) THEN GOTO 1060 


LET ES=L$8 (J) LÍNEA 1000 
LET L$ (3) =LS (K) A 

LET L$ (K) =ES ALFABETICAMENTE 
NEXT K :8R0s 
NEXTJ 


PRINT: PRINT:PRINT 

PRINT “BUSQUEDA POR MATERIAS PULSA 1” 
PRINT “BUSQUEDA POR AUTOR PULSA 2” 
PRINT “BUSQUEDA POR TITULO PULSA 3” 
INPUT “QUE OPCION DESEAS?”; 0 


1130 
1140 
1150 
1160 


1170 
1200 
1210 


1220 
1230 
1240 
1250 
1260 
1270 


1280 
1290 
1300 
1310 
1400 
1410 
1420 
1430 


IF.O=1. THEN GOTO 1200 
IF0=2 THEN GOTO 1400 

IF 0=3 THEN GOTO 1600 

IF 0<>1AND 0<>2 AND 0<>3 THEN GOTO 
1120 

GOTO 1090 

CLS 

INPUT “PON LOS DOS DIGITOS DE LA MATERIA 
QUE QUIERES VER”; X$ 

FOR 1=1 TON 

IFXS= LEFTS (LS (1), 2) THEN GOTO 1250 


GOTO 1260 AQUY SE BUSCA LA MATERI 
NEXT | 7 

INPUT “QUIERES VOLVER AL MENU? (S/N)”; 

Y$ 

IF YS$="N" THEN STOP 

IF. Y$<>"S" AND Y$<>"N" THEN GOTO 1270 


GO TO 1080 


CLS as 

INPUT “ QUE AUTOR QUIERES VER?”;NS 
LET 0 =LEN (NS) 

FORW=0+1T020 


SE COMPLETA BL No, 
DEL AUTOR HASTA 20 
CARACTERES 


LETNS=NS+"" 
NEXTW 
FORI=1TON 


IF MIDS (LS (1), 4,20) = NS THEN GOTO 1490 

E IAS 
ESE AUTOR 

NEXT | 

INPUT “QUIERES VOLVER AL MENU? (S/N)”; YS 

IF Y$=“N" THEN STOP 

IF Y$<>"S" AND Y$<>"N” THEN GOTO 1510 * 

CLS 

GOTO 1090 

CLS 

INPUT “ ESCRIBE EL TITULO”; Z$ 


LETP=LEN (28) 
FOR R=P+1T020 
LETZS=28 +" " 
NEXT R 
FORI=1TON 


IF Z$=RIGHTS (LS (1), 20) THEN GOTO 1690 


GOTO 1700 


20  SARACTERES 


PRINT LS (1) 
NEXT | 


SE Boscan E 
¡IMPRIMEN TODOS LOS 
DATOS RELATIVOS A 
6SE  TéTULO 


1710 INPUT “QUIERES VOLVER AL MENU? (S/N)”; YS 
1720 IF YS8="N" THEN STOP 
1730 1F Y$<>"S" AND Y$<>"N" THEN GOTO 1710 


1740 CLS ARAN VAN 195. DATOS DE (os Logos 

1750 GOTO 1090 ; 

5000 DATA3 

5010 DATA 21,2, JUAN RAMON JIMENEZ, PLATERO Y 
YO 

5020 DATA 21,2,G. GARCIA MARQUEZ, LA HOJARAS- 


CA 
5030 DATA 08,5, MARTINEZ, MATEMATICAS E.G.B. 


NOTAS PARA EL ADULTO 


e [ste es un programa-tipo, escrito en un BASIC conven- 
cional. Como ya conocen, será necesario introducir al- 
gunos cambios mínimos para poder ejecutarlo en deter- 
minados ordenadores. Deben tener en cuenta todas las 
observaciones efectuadas a lo largo de los capítulos anto- 
Tiores a este respecto. 


e En especial, reiteramos la importancia de escribir ade- 
cuadamente las sentencias DATA, efectuar correcta- 
mente los dimensionados y modificar donde sea preciso 
aquellas instrucciones como LEFTS, MID$S y RIGHTS 
que no existen en determinados ordenadores. 


AHORA ME VOY. JUNTOS HEMOS APRENDIDO MUCHO 
SOBRE BASIC. SI TE HA GUSTADO, PUEDES ESTUDIAR MAS. 
LA VERDAD ES QUE NUNCA SE TERMINA DE APRENDER, 
PERO CON LO QUE YA SABES ES SUFICIENTE PARA 

DESARROLLAR PROGRAMAS MUY AVANZADOS. 


LO PRINCIPAL ES QUE HAGAS TUS PROPIOS PROGRAMAS 
EMPLEANDO TU IMAGINACION, Y QUE COMPRENDAS 
QUE TAN IMPORTANTE COMO PROGRAMAR ES SABER 
UTILIZAR EL ORDENADOR COMO UNA HERRAMIENTA DE 
TRABAJO MAS. 


DE TODAS FORMAS, SI QUIERES LEER MAS LIBROS SOBRE 
EL TEMA, TE DIRE LOS QUE MAS ME HAN GUSTADO: 


BELLIDO y SANCHEZ. BASIC para maestros. Ed. 
PARANINFO, 1985. Madrid. 

BELLIDO. Cómo programar su SPECTRUM: Ed. 
PARANINFO, 1984, Madrid. 

CHECROUN. BASIC. Programación de microordena- 
dores. Ed. PARANINFO, 1984. Madrid. 

LARRECHE. BASIC. Iniciación a la programación, 
Ed. PARANINFO, 1984, Madrid. 

ROSSI. BASIC. Curso acelerado. Ed, PARANINFO, 
1984. Madrid. 

SPENCER. BASIC programming. CAMELOT, 1983 
New York. 


Basic avanzado para Niños 


e ¿Qué es el código ASCI1? 

+ ¿Cómo y cuándo utilizar CHR$? 

e ¿Para qué sirven LEN, MIDS, LEFTS, RIGHTS? 
e ¿Qué es eso de los operadores lógicos AND y OR? 


Este libro responde a éstas y otras muchas cuestiones de 
la programación en BASIC. Y lo hace de una manera clara 
y sencilla, de forma que cualquier niño podrá —utilizando 
su ordenador— desde organizarse su propio fichero de 
direcciones hasta listar alfabéticamente una relación 
nominal, pasando por autoevaluar sus conocimientos 
escolares u organizar su propia liga de baloncesto ... 


Apenas son necesarios unos mínimos conocimientos de 
programación. A lo largo del texto, numerosas notas 
aclaratorias, comentarios y guías didácticas explican 
las dudas que puedan surgirle al niño y amplían sus 
conocimientos, 


Utilizando ejemplos sencillos y directamente relacionados 
con su entorno, este libro confiere al niño un sólido 
conocimiento de la programación en BASIC. 


EN ESTA MISMA COLECCION )) 
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